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Preface 



System Logic Library comprises seven volumes. 
Following is the content and order number for each 
volume. 

OS/VS2 System Logic Library, 
Volume 1 contents: SY28-0713 
MVS logic introduction 
Abbreviation list 
Index for all volumes 
Volume 2 contents: SY28-0714 
Method of Operation diagrams for 
Communications Task 
Command Processing 
Region Control Task (RCT) 
Started Task Control (STC) 
LOGON Scheduling 
Volume 3 contents: SY28-0715 
Method of Operation diagrams for 
System Resources Manager (SRM) 
System Activity Measurement Activity (MF/1) 
JOB Scheduling 

— Subsystem Interface 
— Master Subsystem 
— Initiator/Terminator 
— SWA Create Interface 
— Converter/Interpreter 
— SWA Manager 
— Allocation/Unallocation 
— System Management Facilities (SMF) 
— System Log 
— Checkpoint/Restart 
Volume 4 contents: SY28-0716 
Method of Operation diagrams for 
Timer Supervision 
Supervisor Control 
Task Management 
Program Management 

Recovery/Termination Management (R/TM) 
Volume 5 contents: SY28-0717 

Method of Operation diagrams for 
Real Storage Management (RSM) 
Virtual Storage Management (VSM) 
Auxiliary Storage Management (ASM) 
Volume 6 contents: SY28-0718 

Program Organization 
Volume 7 contents: SY28-0719 
Directory 
Data Areas 
Diagnostic Aids 



Please note that if you use only one order 
number, you will only receive that volume. To 
receive all seven volumes, you must either use all 
seven form numbers or, simply the following 
number: SBOF-8210. If you use SBOF-8210, you 
will receive all seven volumes. 

The publication is intended for persons who are 
debugging or modifying the system. For general 
information about the use of the MVS system, refer 
to the publication Introduction to OS/VS Release 
2, GC28-0661. 

How This Publication is Organized 

This publication contains six chapters. Following, is 
a synopsis of the information in each section: 

• Introduction and Master Index — an 
overview of each of the functions this 
publication documents, an abbreviation list of 
all acronyms used in the publication, and a 
complete index for all seven volumes. 

• Method of Operation — a functional 
approach to each of the subcomponents, using 
both diagrams and text. Each subcomponent 
begins with an introduction; all the diagrams 
and text applying to that subcomponent 
follow. 

• Program Organization — a description of 
module-to-module flow for each 
subcomponent; a description of each module's 
function, including entry and exit. The 
module-to-module flow is ordered by 
subcomponent. The module descriptions are 
in alphabetic order without regard to 
subcomponent. 

• Directory — a cross-reference from names in 
the various subcomponents to their place in 
the source code and in the publication. 

• Data Areas — a description of the major 
data areas used by the subcomponents (only 
those, however, that are not described in 
OS/VS Data Areas, SYB8-0606, which is 
on microfiche); a data area usage table, 
showing whether a module reads or updates a 
data area; a control block overview diagram 
for each subcomponent, showing the various 
pointer schemes for the control blocks 
applicable to each subcomponent; a table 
detailing data area acronyms, mapping macro 
instructions, common names, and symbol 
usage table. 
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Diagnostic Aids — the messages issued, Coreqilisite Reading 

including the modules that issue, detect, and „ _ „ 

. , . , , The following publications are corequisites: 

contain the message; register usage; return # J£s2 SY28 _ 062 2 

codes; wart state eodes; and miscellaneous # Qs/Vs ^ ^^ SYB8 . 0606 (This 

document is on microfiche.) 
• OS/VS2 System Initialization Logic, 
SY28-0623 
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This section uses diagrams and text to describe the 
functions performed by the scheduler, supervisor, 
MF/1, SRM, and ASM functions of the OS/VS2 
operating system. The diagrams emphasize 
functions performed rather than the program logic 
and organization. Logic and organization is 
described in "Section 3: Program Organization." 

The method-of -operation diagrams are arranged 
by subcomponent as follows: 

Communications Task. 

Command Processing (includes 

Reconfiguration Commands). 

Region Control Task (RCT). 

Started Task Control (STC) (includes 

START/LOGON/MOUNT). 

LOGON Scheduling 

System Resources Manager 

System Activity Measurement Facility 

(MF/1) 

Job Scheduling: 

- Subsystem Interface. 

- Master Subsystem. 

- Initiator/Terminator. 

- SWA Create Interface. 

- Converter/Interpreter. 

- SWA Manager. 

- Allocation/Unallocation. 

- System Management Facilities (SMF). 

- System Log. 

- Checkpoint/Restart. 
Timer Supervision. 
Supervisor Control. 
Task Management. 
Program Management. 
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• Recovery/Termination Management (R/TM). 

• Real Storage Management (RSM). 

• Virtual Storage Management (VSM). 

• Auxiliary Storage Management (ASM). 

The diagrams for each subcomponent are 
preceded by an introduction that summarizes the 
subcomponent's function. Following each 
introduction is a visual table of contents that 
displays the organization and hierarchy of the 
diagrams for that subcomponent. 

The diagrams cross-reference each other using 
diagram numbers and module names. As an aid in 
locating the diagrams that are cross-referenced, an 
alphabetic list of all diagram names and their 
corresponding page numbers follows this 
introduction. 

Method-of -operation diagrams are arranged in 
an input-processing-output format: the left side of 
the diagram contains data that serves as input to 
the processing steps in the center of the diagram, 
and the right side contains the data that is output 
from the processing steps. Each processing step is 
numbered; the number corresponds to an amplified 
explanation of the step in the "Extended 
Description" area. The object module name and 
labels in the extended description point to the code 
that performs the function. 

Note: The relative size and the order of fields 
within input and output data areas do not always 
represent the actual size and format of the data 
area. 
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Primary processing — indicates major functional flow. 



Secondary processing — indicates functional flow within a diagram. 



I ^ Data movement, modification, or use. 



— ► Data reference — indicates the testing or reading of a data area to 
determine the course of subsequent processing. 



Pointer — indicates that a data area contains the address of another 
data area. 



-f — )*- Indirect pointer — indicates intermediate pointers have been omitted. 



-o 



Connector — indicates that a diagram is continued on the next page. 



Figure 2-1. Key to Symbols Used in Me thod-of-Operation Diagrams 
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Real Storage Management (RSM) routines 
administer the use of real storage and direct the 
movement of virtual pages between auxiliary 
storage and real storage in page-size blocks. The 
routines make all addressable virtual storage in 
each address space appear as real storage to the 
user. Only virtual pages necessary for execution are 
kept in real storage; the remainder reside on 
auxiliary storage. RSM calls Auxiliary Storage 
Management (ASM) routines to perform the paging 
I/O necessary to transfer pages into and out of real 
storage. ASM also provides direct storage allocation 
and management for paging I/O space on auxiliary 
storage. The System Resources Manager provides 
guidance for RSM in the performance of some of 
these functions. 

RSM assigns real storage frames on request from 
a pool of available frames (the available frame 
queue), associating virtual addresses with real 
storage addresses. Frames are repossessed on 
termination of use, when freed by a user, when a 
user is swapped out, or when needed to replenish 
the available frame queue. While a virtual page 
occupies a real frame, the page is considered 
pageable unless specified as fixed, either by the 
PGFIX routine, or by the system for its own use. 
RSM routines also allocate nonpageable (v=R) 



regions on request by those programs that cannot 
tolerate dynamic relocation. Such a region is 
allocated from a predefined area of real storage 
and is nonpageable. Programs in the v=R region do 
use dynamic address translation, although the 
addressing is on a one-to-one basis. 

RSM routines determine the working set size for 
swap-in and swap-out functions. They maintain the 
necessary information to remove the virtual pages 
of an address space from real storage during 
swap-out and to re-establish them during swap-in. 
ASM provides the paging I/O for the swap function. 

RSM also provides a set of service routines for 
use by the system: 

Table building for address translation 

Page fault processing 

Alteration of the pageable status of virtual 

pages 

Capability for paging in virtual pages before 

needed 

Capability for paging out selected pages 

Address translation from real to virtual 

addresses 

Varying real storage frames online or offline 

Virtual I/O (ViO) services 

Error recovery processing 
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Figure 2-43. Real Storage Management Visual Contents (Part 2 of 2) 
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Diagram 23-1. LSQA/SQA Allocation (IEAVSQA) (Parti of 2) 
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Input 



FromGETMAIN (IEAVGM00) 
or Address Space 
Initialization (IEAVITAS) 

Process 



Frame Queues 
PFTE p FTE 









z*^ 1 Search for a frame to be used for 
"^ SQA or LSQA. 



2 Call IEAVEQRI to perform completion 
processing for intercepted frames. 



3 Update PFTE and move it to the 
correct queue. 



4 Clear the real frame and validate 
and update the page table entry. 



5 Return. 
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Diagram 23-1 . LSQA/SQA Allocation (IEAVSQA) (Part 2 of 2) 

Extended Description Module Label 

SQA or LSQA Allocation (IEAVSQA) assigns real storage 
frames to those virtual pages that VSM or RSM's Address 
Space Initialization routine specifies to be SQA or LSQA 
pages. The caller holds the SALLOC lock and is in key 0, 
supervisor state. 
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1 Satisfaction of the request is first attempted by access- 
ing the AFQ (available frame queue) to find a frame 
outside the V=R area and also, if desirable, within the pre- 
ferred area. If a PFTE (page frame table entry) for such a 
frame is found on this queue, it is dequeued and the request 
will be satisfied. If no preferred area frames exist on the 
AFQ, an attempt is made to steal a preferred area frame 
that holds a virtual page. Only unchanged, non-fixed 
frames for which no PCB exists are candidates for this 
stealing. Frames which are fixed, allocated to an active 
V=R region, offline, are changed, have paging I/O in 
progress, or contain a storage error are excluded. The Local 
and Common Frame queues are searched (in that order) 
for a frame meeting the steal criteria. 

The search stops as soon as a stealable frame in the preferred 
area is found. If none can be stolen, non -preferred area 
frames outside the V=R area on the AFQ become candidates, 
and one is stolen if it exists. If no such frames exist on the 
AFQ, but one was found on the local or common frame 
queue, it will be stolen and used for the request. If any such 
non-preferred, non-V=R frame is used, the physical storage 
unit containing the frame is converted from non-preferred to 
preferred storage. 

If no pageable area frames can be found, the V=R area 
frames on the AFQ become candidates and one is taken if 
any exist. If none can be found, the V=R area frames of the 
other queues become candidates and one will be taken. 
Frames that have been intercepted for a V=R region are 
skipped if a stealable, non-intercepted, V=R area frame exists 
on any of the queues. If no frame could be obtained and the 
request is for an LSQA page or unassigned frame (VSA=0), no 
further action is taken and a return code of 4 is passed to 
the caller. 



IEAVSQA 



Extended Description 

For SQA requests, the search moves to the SQA Reserve 
queue, where a certain number of frames are held, usually one. 
When a reserved frame is taken, the SQA Reserve Queue 
Deficit count is increased, telling the PFTE Enqueue routine 
that the next frame sent to the AFQ should be diverted to 
the SQA Reserve queue to replenish it. If the SQA Reserve 
queue is also empty, an out of real storage condition exists 
and return code 4 is given to the caller. 

2 If the selected frame was previously intercepted for a 
V=R region, the V=R Wait queue is scanned to locate 

the root PCB for the V=R region so that it can be marked 
as failed. Then the IEAVEQRI entry is called, passing the 
RBN of the intercepted PFTE to start the process that will 
lead V=R allocation to post the region ECB with code 16. 

3 If the input virtual storage address was 0, the VBN 
(virtual block number) in the PFTE of the selected 

frame is set to zero, as are all the PFTE flags except PFTVR 
(V=R area) and the Intercept flags. The PFTLSQA flag is 
also set. The PFTE is dequeued and the RBN (real 
block number) of the frame is placed in register one 
before returning to the caller with a code of zero. 

If the input virtual storage address is not zero, the frame is 
to be assigned to the page corresponding to the VSA. First 
the PFTE is moved to the LSQA or SQA frame queue, 
depending on whether the VSA is in the private or common 
area address range. The frame counts of the sending and 
receiving queues are adjusted where necessary. The VBN of 
the page is placed in the PFTE and either the current ASID 
or x'FFFF' (for SQA pages) placed in the PFTASID field. 
The PFTLSQA is turned on and all other flags except the 
PFTVR and intercept flags turned off. The system fix 
counters are also incremented. 

4 The PGTE for the page is updated with the real address 
of the block, the GETMAIN bit is set to one, and the 

invalid bit is set to zero. The XPTE protect key field is set 
to zero (for LSQA only). The real storage key is also set to 
zero. Finally, the entire page is cleared to zeros. 
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Diagram 23-2. V=R Region Allocation (IEAVEQR) (Part 1 of 4) 

From GETP ART 
Input Processing (IEAVPRT0) ^^ 




1 Get the necessary number of real frames. 



2 Create page tables, if necessary, 
and move PFTEs for available 
frames to local frame queue. 



3 If all frames are not available, 
enqueue a root PCB and go 
to step 7. 



4 Validate PGTEs and setreal frames 
to zero. 



5 Move all PFTEs to local frame 
queue. 
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Diagram 23-2. V=R Region Allocation (IEAVEQR) (Part 2 of 4) 



Extended Description 

V=R Region Allocation (IEAVEQR) allocates contiguous 
regions of real storage for V=R requests. 

1 Upon receiving control, V=R allocation attempts to 
locate the proper number of contiguous real frames 
necessary for the region request. This is done by indexing 
through the PFT, starting with the PFTE that corresponds 
to the VSM-supplied starting address, and selecting frames 
for use. Frames need not be on the AFQ to be included in 
the region. Frames not available will be marked as inter- 
cepted for V=R allocation; they will be picked up later, as 
they become available. If an intercepted frame's page is in 
the current address space, it is paged out, thereby freeing up 
the frame for V=R. If an SQA, LSQA, long-fixed V=R 
allocated, offline, or intercepted page frame is encountered, 
the search is terminated and any frames already assigned to 
the region are restored to their previous status. If VSM 
indicated the region must start at the specified address, the 
allocation process is terminated and VSM is informed that 
allocation has failed with a return code of 16. If this require- 
ment was not specified, the search is restarted with the first 
page frame following the unusable frame. This process con- 
tinues until the region is allocated or the V=R area has been 
exhausted. If no region can be allocated anywhere in the 
V=R area, VSM is informed via return code 16 that alloca- 
tion has failed. 



Module 



Label 



IEAVEQR IEAVEQR 



Extended Description 

3 If all frames are not immediately obtained, a root PCB 
is placed on the V=R Wait queue pointed to by the 

PVT. Into the root is placed the count of the number of 
allocated but unavailable (intercepted) frames, the ASCB 
address, the address range of the selected region, and the 
input ECB address. Return code four is placed in register 15 
and IEAVEQR exits. 

4 All PFTEs are moved to the local frame queue. 

5 The root PCB can be freed by putting it on the avail- 
able queue. 



Module 



Label 



2 Once a region has been allocated, the page tables are 

created where necessary. Then the status of each frame 
is determined. All frames selected from the AFQ are moved 
to the local frame queue and the system fix counters 
(RSMCNTFX and PVTCNTFX) are incremented. Also, 
fields in the PFTE are updated to reflect the new owner. 
Frames not on the AFQ have the PFTVRINT flag set. The 
starting address of the region is placed in the start address 
field of the input list. 
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£ Diagram 23-2. V=R Region Allocation (IEAVEQR) (Part 3 of 4) 
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Process 





8 Find root PCB for region in which 
input frame resides. 



g Force a page-out for all pages in V=R 
area by scheduling IEAVEQRP. 



10 When all frames for a region are 
available, build and schedule an 
SRB for the completion of 
allocation. 



1 1 Validate the region as in steps 4-6. 



12 Notify the waiting initiator that 
region allocation is complete. 

13 Return. 
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(IEAVEDS0) 



Diagram 23-2. V=R Region Allocation (IEAVEQR) (Part 4 of 4) 

Extended Description Module Label 

6 Control is passed to GETPART, with a return code to 
indicate the action taken. 



7 IEAVEQRI scans the V=R Wait queue looking for a root 

PCB whose region range includes the frame. If none is 
found an internal error ABEND is generated to record the 
condition. The unwanted frame is returned to the caller by 
leaving its RBN in the input parameter field. If the frame is 
part of a waiting region, it is left in its dequeued state, the 
count in the root is decreased by one, and the input RBN 
set to zero to indicate acceptance of the frame. Next the 
PFTE is checked to determine if the frame is also inter- 
cepted for offline or storage error processing. If so, a POST 
code of 16 is set up. Otherwise, the frame count in the 
PCBR is decreased by one and then the value is checked for 
zero. 



IEAVEQRI 



Extended Description 

10 When the frame count in the root PCB becomes zero, 

a POST code of is indicated. (GETCELLwas 
called early in V=R allocation for an SRB area in order to 
schedule a POST in the caller's address space.) The 
completion routine is then scheduled with a POST code of 
or 16. In all cases. Intercept returns to its caller. 

1 1 Get the local and SALLOC locks. Then follow the 
same procedure as in steps 4-6. 

12 The caller's ECB is posted with code or 16. The 
root PCB and the SRB are freed before exiting; also 

the PFTFPCB bit is set. 
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Label 



8 If all frames are not immediately obtained, V=R Allo- 
cation schedules IEAVEQRP into the first address 
space that has pages in the V=R area. When that routine has 
issued page-outs for all addressable pages, it searches the 
PFTEs for another ASID to be cleared. If another ASID's 
pages are in the V=R area, IEAVEQRP schedules itself into 
that address space. If no other address spaces have V=R 
area frames, IEAVEQRP frees the SRB. 



9 If all frames are available, the region can be validated 

and the request completed. Validation consists of 
placing the real storage addresses into the proper PGTEs, 
turning off the invalid flag, turning on the GETMAIN flag, 
clearing the region to zeros, and setting all keys to 0. A 
return code of is passed to the caller when this is 
completed. 
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Diagram 23-3. Freeing a V=R Region (IEAVEQR) (Part 1 of 2) 



From FREEPART 
Processing (IEAVPRT0) 



Input 



Process 



Parameter List 
(From FREEPART) 



Local Frame Queue 



PFTE | 
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Output 



1 If the region is not totally allocated, 
turn off the intercept flag for frames 
in use. Then free the root PCB. 
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2 Invalidate PFTEs and free LSQA space 
used for PGT and XPT. 



3 Return all PFTEs assigned to the 
region to the available frame queue. 



4 Purge the TLBs on all CPUs. 



5 Return. 
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Diagram 23-3. Freeing a V=R Region (IEAVEQR) (Part 2 of 2) 

Extended Description Module Label 

The Free V=R Region routine (IEAVEQR) returns V=R 
allocated frames to the available queue for reuse by the 
system . 



1 If the PCBRINT flag in the page control block is set to 
one, the completion routine was scheduled to post the 

ECB; therefore, the completion routine needs the PCBR. In 
that case, the PCBR is not dequeued. Free sets PCBRPB so 
that when the completion routine does get control, it will 
check the bit and dequeue the PCBR. On the other hand if 
the PCBRFPCB bit is on in the Free routine, the completion 
routine has already run. Complete sets the bit to notify Free 
to free the PCBR in addition to freeing the V=R region. 

2 The PFTE for each frame that is part of the region is 
located and its V=R allocated flag turned off. Frames 

that are intercepted for V=R have the intercept flag turned 
off as well. 

3 Any frames already on the Local Frame Queue plus 
any unqueued frames are returned to the AFQ. Page 

tables that contain only V=R region pages are disconnected 
and freed. For each frame that was found on the local frame 
queue, the system fix counters (RSMCNTFX and 
PVTCNTFX) are decremented by one. 

4 Page invalidation is called to purge the TLBs on all 
CPUs in the system. 

5 Control is returned to FREEPART. 
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Diagram 23-4. Page Release Processing (IEAVRELS) (Part 1 of 2) 
Input 



From Page Services Interface 
Routine (IEAVPSI) 
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Process 



A 1 Invalidate the PGTE for the page 
and free the real frame. 



Z} 2 '* tne P a 9 e ' s not ,n rea ' storage, 
search for anv PCB and process it. 



3 Free any auxiliary storage assigned 
to the page. 



4 Process all pages in the VSL entry 
and repeat steps 1 -3 for all VSL 
entries in the CIWA. 



Zy> 5 Return, indicating the status of 
processing. 
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Diagram 23-4. Page Release Processing (IEAVRELS) (Part 2 of 2) 



Extended Description 

The PGRLSE routine (IEAVRELS) gets control from PSI to 
free one or more pages from real and auxiliary storage. 

1 PGRLSE performs initial checking on the VSL entry 
and the addresses contained in the VSL entry- If an 

invalid address is found, PGRLSE passes, in the CIWA, a 
return code of 4 to PSI. 

PGRLSE obtains the PGTE and XPTE addresses from the 
Find Page routine. If the page is in real storage, PGRLSE 
checks the PFTE. If the frame is V=R allocated, fixed, or 
located in SQA or LSQA, PGRLSE terminates processing 
the page. Otherwise, PGRLSE calls Page Invalidation to 
invalidate the PGTE and then calls PFTE Enqueue/Dequeue 
to free the PFTE. 

2 If the page is not in real storage, PGRLSE first checks 
to see if the page is assigned by GETMAIN; if not, 

PGRLSE puts a return code of 4 in the CIWA and returns 
control. Then PGRLSE searches the following queues for 
PCBs associated with the virtual page being processed: GFA 
Defer Queue, Common I/O Active Queue, and Local I/O 
Active Queues. If any PCBs with non-zero fix counts are 
found, PGRLSE terminates processing of the page, leaving 
the PCBs on their queue. 

If PGRLSE finds a PCB on the GFA Defer Queue, it purges 
the PCB. If the PCB is for a page fault and is in SRB mode, 
PGRLSE calls the Reset routine of the PCIH to reactivate 
the suspended SRB. PGRLSE puts other page fault PCBs 
on the I/O active queue and requests I/O completion proc- 
essing. If the PCB has a root PCB, the PCB count in the root 
PCB is decreased by one and the PCB is scheduled for I/O 
completion processing. For a PCB not for a page fault and 
without a root PCB, PGRLSE returns the PCB to the free 
queue. 

If PGRLSE finds PCBs on the I/O active queues, it purges 
them by setting to zero the virtual block number and by set- 
ting the free-real -storage flag to one. 



Module 



Label 



IEAVRELS IEAVRELS 



Extended Description 

3 If the save auxiliary storage flag is not set to one in the 
XPTE, PGRLSE calls ASM to free the auxiliary slot 

assigned to the virtual page. PGRLSE sets the auxiliary stor- 
age assigned flag in the XPTE to zero. Then it returns con- 
trol to PSI. 

4 PGRLSE processes all pages in the VSL entry and, if 
no errors occur, continues with the next VSL entry 

until complete. 

5 PGRLSE returns control to PSI, putting a return code 
in the CIWA. 
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Diagram 23-5. FREEMAIN Release Processing (IEAVRELS) (Part 1 of 2) 
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1 For pages with real frames, 
invalidate real and virtual page. 



If a deferred release has been 
completed, notify FREEMAIN 
(IEAVGMOO). 
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PGT 



3 For pages without real frames, 
search for any PCB for the page and 
process it. 



4 Free auxiliary storage assigned 
to the page. 
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released, call IEAVDSEG to 
invalidate the segment. 
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description) 



Diagram 23-5. FREEMAIN Release Processing (IEAVRELS) (Part 2 of 2) 
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Extended Description 



Module 



Label 



Extended Description 



Module 



Label 



Deferred and FREEMAIN Page Release Processing (a part 
of IEAVRELS) performs PGRLSE functions for two special 
cases: when an RSM routine frees a frame marked for 
deferred release, and when FREEMAIN frees a page. 
The RSM routines are: IEAVSOUT, IEAVTERM, 
IEAVFREE, IEAVIOCP, and IEAVPIOP. 

1 When entering at the IEAVRELV entry point, the 
caller holds the SALLOC lock and the local lock. 

When entering at the IEAVRELF entry point, the caller 
holds the SALLOC lock. Page Release uses the Find Page 
routine to get the PGTE and the XPTE addresses. If the 
page has a frame assigned, Page Release checks the PFTE. 
If the page is an SQA page or an LSQA page with a VBN 
matching the input VBN, Page Release moves the PFT to 
the available frame queue and then, using the Page Invalida- 
tion routine, invalidates the PGTE. The system fix counters 
(SQACNTFX, RSMCNTFX, and PVTCNTFX) are also 
decremented. 

2 If the deferred release flag is set in the PFTE and if 
the fix count is zero. Page Release notifies FREEMAIN 

that the virtual page may be used again. 



IEAVRELS IEAVRELV 



IEAVRELF 



3 If the virtual page does not have a frame in real storage. 
Page Release checks for a PFTE with the deferred 

release flag set. If it finds one, it resets the flag and notifies 
FREEMAIN that the virtual page can be used again. If it 
does not find one. Page Release searches for PCBs for the 
virtual address and processes them according to the queue 
they are associated with. When all such PCBs are processed, 
Page Release sets the PGTE to zero. 

4 Page Release tests the XPTE. If the auxiliary-storage- 
assigned flag is set and the save-auxiliary -storage flag 

is not. Page Release calls ASM to free the auxiliary storage 
slot assigned to the logical page ID (LPID). Then Page 
Release resets the LPID generator value in the XPTE to zero 
and sets to zero all flags in the XPTE. 

5 If all PGT entries for a private area segment containing 
the input virtual address are set to zero. Page Release 

calls the Destroy Segment routine to invalidatethe PGTEs 
and XPTEs and to prepare the table storage for FREEMAIN 
processing. Then Page Release frees the page table space. 

6 Page Release returns control to FREEMAIN or to the 
RSM routine that called it. 
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Diagram 23-6. Create Segment (IEAVCSEG) (Part 1 of 2) 
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Process 
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New 
Segment 




~_\ 1 Initialize page table entries. If 
page-table -only option specified, 
go to step 4. 



2 Initialize external page table entries. 



3 Initialize SPCT entry for new 
segment. 



4 Initialize and validate segment table 
entry. 
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Diagram 23-6. Create Segment (IEAVCSEG) (Part 2 of 2) 

Extended Description Module 

The Create Segment routine (IEACSEG) is called by VSM 
functions, NIP, and the V=R Allocation routine to initialize 
the page tables for one or more newly created segments. The 
local lock must be held by the caller. V=R Allocation uses 
the IEAVCSGB entry point to avoid setting a pointer to the 
RSM FRR. 



Label 



1 When entered at IEAVCSEG, Create Segment sets a 
pointer to the RSM functional recovery routine 

IEAVRCV. It validity checks parameters passed. Then Create 
Segment initializes the page table for the new segment. It 
does this by setting 32 bytes of storage to zero, setting the 
real block number fields in each page table entry to zero, 
and setting the page table GETMAIIM flag to zero and the 
invalid flag to one. 

2 If the bypass XPT option was not selected. Create Seg- 
ment establishes an external page table in the next 192 

bytes of storage by setting each external page table entry to 
zeroes. 



IEAVCSEG 



IEAVCSEG 
IEAVCSGB 



Extended Description 

3 If the XPT is created and the SPCT address is not zero. 
Create Segment sets the segment index, the virtual 

address of the PGT, and the segment entry count in the 
SPCT. If necessary. Create Segment enlarges the SPCT 
(under the SALLOC lock) by obtaining storage for the 
SPCT, under GETMAIIM, moving the SPCT, updating the 
size and entry count fields in the SPCT, and freeing the old 
SPCT with FREEMAIN. 

4 Create Segment initializes the segment table entry for 
the new segment by setting the invalid flag to zero and 

inserting the page table length and the real storage address 
of the page table. 

5 Create Segment repeats the procedure for additional 
segments, and then returns to the caller. 



Module 



Label 



oo 

o 



Diagram 23-7. Destroy Segment (IEAVDSEG) (Part 1 of 2) 
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From IEAVRELS during FREEMAIN 
Frame Processing (IEAVGMOO) 
and V=R Freeing (IEAVEQR) 



Input 
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Parameters 



SGT 
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Tocess 




")> 1 Get virtual address of page table. 




2 Invalidate the segment table entry 
and purge the TLB on all CPUs. 



3 Set the SPCT entry to zero and 
repack the SPCT. 



Output 





To IEAVRELS during FREEMAIN 
Frame Processing (IEAVGMOO) and 
V=R Freeing (IEAVEQR) 



Diagram 23-7. Destroy Segment (IEAVDSEG) (Part 2 of 2) 
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Extended Description 



Module 



Label 



The Destroy Segment routine (IEAVDSEG) invalidates con- 
trol block entries for a virtual segment that is being deleted; 
it returns the address of the page table space to be freed with 
FREEMAIN by the caller. The caller must hold theSALLOC 
and local locks. Destroy Segment is called by V=R Alloca- 
tion and by PGRLSE. 



1 Destroy Segment gets the virtual address of the page 

table by translating the real address obtained from the 
segment table entry. 



IEAVDSEG IEAVDSEG 



2 Destroy Segment invalidates the segment table entry 
by setting the entry to zero and then setting the invalid 

flag to one. It then calls the Page Invalidation routine 
IEAVINV, passing a dummy PQTE address to invalidate 
the translation lookaside buffers. 

3 Destroy Segment checks the RSM Header for an SPCT 
address; if zero. Destroy Segment returns to the caller. 

If an address is given. Destroy Segment sets the SPCT entry 
matching the destroyed segment to zero, decreases the SPCT 
entry count, and repacks the last SPCT entry into the entry 
just set to zero. 

4 Destroy Segment returns to the caller with the virtual 
address of the page table, to be freed with FREEMAIN 

by the caller. 
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Diagram 23-8. Program Check Interrupt Extension (IEAVPIX) (Part 1 of 2) 
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Diagram 23-8. Program Check Interrupt Extension (IE AVPIX) (Part 2 of 2) 
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Extended Description 

The Program Check Interrupt Extension (IE AVPIX) services 
all page translation interrupts. It gets control from the 
PCIH on all page faults except those incurred by a routine 
holding a global lock, which should not have a page fault. 

1 PIX first acquires the storage allocation global lock 

(SALLOC) and sets up the RSM FRR. The page fault 
is checked for validity by checking the GETMAIN-assigned 
flag in the page table entry that corresponds to the virtual 
address for which the interruption occurred. If the flag is 
off or if no page tables exist for the virtual address, PIX 
returns to PCIH with a return code indicating the interrupt 
should be treated as a logical protection exception (0C4 
ABEND). During this check, internal errors may be detected 
if the segment or page table Is not correctly built or initial- 
ized, triggering special recovery processing. Return code 1 2 
is given to PCIH to indicate a RSM error prevented page 
fault resolution. The page may also have been marked as 
valid in real storage because another CPU validated the page 
after the page fault occurred. For this case, no further proc- 
essing would be required for the page fault and return code 
4 is given. 
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IEAVPIX IEAVPIX 



Extended Description 

2 A PCB is built and initialized for use by other RSM 
functions that must be employed to satisfy the page 

fault. General Frame Allocation (GFA) is then called with 
the PCB address passed as a parameter. 

3 General Frame Allocation attempts to assign a real 
frame to the virtual page. Upon completion of its func- 
tion, it returns to PIX indicating the action taken. PIX 
interprets these return codes and issues the proper return 
code to the PCIH. The code indicates that either the 
interrupted routine may continue execution (no paging I/O 
was necessary to satisfy the page fault), or the interrupted 
routine's execution was suspended until paging I/O can be 
completed to satisfy the page fault. 
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Diagram 23-9. General Frame Allocation (IEAVGFA) (Part 1 of 4) 
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Diagram 23-9. General Frame Allocation (IEAVGFA) (Part 2 of 4) 
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Extended Description Module 

General Frame Allocation (IEAVGFA) is called by Program 
Interrupt Extension, Page Fix, Page Load, and Swap-In to 
assign real frames to virtual pages. Each virtual page requir- 
ing a real frame is represented by a PC6 (page control block). 

1 If the PCB is not for the swap-in of a private area (LSQA IEAVGFA 
or PGFIX) page, reclamation is attempted. 

The last real storage frame the page occupied is located by 
looking at the real address field of the PGTE. The Page 
Frame Table Entry (PFTE) for the frame is examined to 
see if it still contains the page. If it does, the frame is used 
to satisfy the current request except as noted in the follow- 
ing paragraph. If input I/O is in progress for the frame, the 
current request is related to the existing request and the 
current requestor is suspended if he is satisfying a page fault. 
If output is in process, general frame allocation determines if 
the output operation has been marked non-reclaimable; that is, 
the PCB represents the output for a V=R or Vary Storage 
Intercepted frame. If it has been marked non-reclaimable, 
reclaim fails and the copy of the output page is duplicated in a 
new storage frame. Otherwise, the frame and the page are 
made immediately available by validating the PGTE and setting 
storage keys. 

If the request is for a "long fix" of a page and reclamation 
would place the page in the V=R area or outside the 
preferred area for a non-swappable "long-fix" page, 
reclamation is suppressed. If necessary, the existing copy 
of the page is duplicated outside the V=R area or inside 
the preferred area and the frame is freed. Naturally, this 
can be done only if the page is not already fixed. 

If reclamation is successful, the next input PCB is processed. 
Also, if the input PCB represents a fix request and the fix 
count in the PFTE is currently zero, the system fix counters 
are updated (incremented by one). 

2 If reclamation fails or if it is not attempted, IEAVGFA 
tries to allocate a new real frame from the Available 

Frame Queue (AFQ). 

If no special requirements exist, the first frame on the AFQ 
is assigned to the request. If the PCB represents a LSQA or 
PGFIX request, the system fix counters are incremented by 
one. Fix data is transferred from the PCB to the PFTE and 
allocation is complete. If no frames are available, the input 
PCB is marked 'defer' to indicate allocation failed. 
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Extended Description 

There are special requirements associated with "long fix" 
and Stage I swap-ins. V=R area frames are never used for 
long-fix pages or Stage I pages of address spaces that may 
become non-swappable. Whenever possible, these types of 
pages are assigned to frames in a N IP-designated 'preferred 
area' so that they will be out of the way of most requests 
to vary storage. 

However, if no 'preferred' frames are available, an attempt 
is made to steal a preferred area frame from some virtual 
page. Only unchanged, non-fixed frames for which no 
PCB exists are candidates for this stealing. Frames that 
are excluded are fixed, allocated to an active V=R region, 
offline, changed, have paging I/O in progress, or contain 
a storage error. The local and common frame queues 
are searched (in that order) for a frame meeting the steal 
criteria. The search stops as soon as a stealable frame in 
the preferred area is found. If no preferred area frame 
can be obtained, a non-preferred, non-V=R frame is used 
if available. If one such frame is found on the AFQ, the 
physical storage unit containing the frame is converted 
from non-preferred to preferred storage. 

Stage I pages of swappable address spaces are treated 
similarly except that they can be placed in V=R area 
frames if no other frames are available. As in the simple 
case, if the page cannot be allocated, it is marked 'defer'. 

If none are available or meet the allocation criteria, the 
input request is deferred by placing the PCB on the GFA 
Defer Queue and then continuing with the next input PCB. 

If allocation is successful, it is determined if any other 
requests for the same page are presently deferred. If there 
are any, they are removed from the Defer queue and 
attached to the current request via the PCB relating mech- 
anism, so they will be satisfied as well. 

3 If no auxiliary storage copy of the page exists, an 
empty page is created by validating the page table 
entry (PGTE) for the page, setting the storage to zeroes, 
and setting the storage keys to the value specified in the 
external page table. If the PCB indicates a need for any 
follow-up processing, it is performed immediately where 
possible and scheduled for asynchronous processing if not. 
If no asynchronous processing is needed, the PCB is freed. 
In either case, the next input PCB is then begun. 
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Diagram 23-9. General Frame Allocation (IEAVGFA) (Part 3 of 4) 
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Diagram 23-9. General Frame Allocation (IEAVGFA) (Part 4 of 4) 
Extended Description Module Label 

4 If an auxiliary storage copy of the page does exist, 
the PCB is queued for page-in I/O and its AIA (ASM 

I/O Request Area) is placed on an internal I/O request 
queue. If the request involves a page fault, the execution of 
the faulting RB or SRB is stopped by a call to the Suspend 
routine of PCIH. A PCB flag is set to indicate that reset 
is required when the request is eventually satisfied. The 
next input PCB is then begun. When all PCBs are processed, 
IEAVGFA returns control to the caller. 

5 When all input PCBs have been processed as above, the 
chain of ASM I/O request areas (AlAs) is passed to the 

Auxiliary Storage Manager (ASM) for satisfaction. If any 
input request was deferred, related to other I/O, or sent to 
ASM, a return code of 4 is given; otherwise the return code 
isO. 

6 IEAVGFA removes PCBs from the Defer Queue one 
at a time and passes them to the main portion of 

IEAVGFA for allocation processing. When all PCBs on the 
Defer Queue for this address space have been processed. 
IEAVGFA returns control to the caller. 
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Diagram 23-10. Page I/O Post (IEAVPIOP) (Part 1 of 2) 
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6 When the last AIA has been pro- 
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lock, frees the FRR, and returns 
control to the Auxiliary Storage 
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7 Schedule I/O completion pro- 
cessing (IEAVIOCP) in the caller's 
address space. 

Return. 
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Diagram 23-10. Page I/O Post (IEAVPIOP) (Part 2 of 2) 



Extended Description Module Label 

Page I/O Post (IEAVPIOP) notifies waiting routines that an 
I/O operation has completed. 

1 After establishing FRR linkage and setting up the recov- IEAVPIOP IEAVPIOP 
ery communication area (RCA), PIOP gets the SALLOC 

lock. Then it checks the I/O completion information in the 
AIA that is passed as input. If an error is found, PIOP issues 
an abnormal termination request with a code of X'COD'. PIOP 
moves the completion information from the AIA to the 
PCB and to all related PCBs. If an I/O error has occurred, 
PIOP sets l/O-completed and I/O error flags in each PCB. 

2 PIOP processes the input depending upon whether the 
operation is a page-out, a normal page-in, or a stage I 

swap-in. For page-out PCBs, PIOP frees the PCB and the real 
frame unless an I/O error occurred. If an I/O error occurred, 
PIOP changes the page-out PCB to a page-in PCB and 
schedules the I/O completion processor to revalidate the 
page 

3 For common area page-in PCBs, PIOP schedules the I/O 
related PCBs by removing them from the related chain 

and either freeing them or, if IEAVRSET or a root exit 
routine is to be called, putting them on a common I/O active 
queue. PIOP determines from the free-real -storage flag 
whether to free or save the real so that any zero TCB fix 
PCBs are the last to be processed by the I/O completion 
processor. Then, if necessary, PIOP schedules I/O comple- 
tion processing (IEAVIOCP). 



Extended Description 

4 For private area page-in PCBs PIOP schedules the I/O 
completion processor to validate the PGTE and/or to 

call IEAVRSET or a root exit routine. The input PCB and 
any PCBs related to it remain unchanged. If an I/O error 
occurred, the I/O completion processor will not validate 
the PGTE and will call IEAVRSET with an error completion 
code. 

5 If the PCB in a stage I swap-in for a private and page 
and no I/O error occurred, PIOP removes the PCB from 

the I/O active queue and enqueues it to the swap-in root 
PCB. If an I/O error occurred, the PCB and the frame are 
freed and the root PCB fail flag is set. If the PCB is for the 
common area and no I/O error occurred, PIOP validates the 
PGTE. If an I/O error occurred, PIOP rearranges any related 
PCBs so that any zero TCB fix PCBs are the last to be proc- 
essed by the I/O completion processor. If necessary, the I/O 
completion processor is scheduled. Whenever PIOP finds a 
PCB for a swap-in it decreases the root PCB 
count and, when that count goes to zero, calls the root 
exit routine. Whenever PIOP finds a PCB for a PGFIX or 
PGLOAD with an ECB, it decreases the root PCB count 
except when that count goes to zero. When that count goes 
to zero, PIOP makes sure that the I/O completion processor 
is scheduled to decrease the count and call the root exit 
routine. 

6 When the last AIA has been processed, PIOP releases 
the SALLOC lock, frees the FRR, and returns control 

to the Auxiliary Storage Manager. 



Module 



Label 



< 

© 

bo 

o 



3* 

a 

o 
O 
9 



7 In a special scheduling routine of PIOP, called 
IEAVOPBR, PIOP examines the PCB and any 
related PCBs to determine how to schedule IEAVIOCP. 
If IEAVIOCP has not already been scheduled, PIOP 
gets an SRB, initializes it, and schedules it. 
Return to caller. 



IEAVPIOP IEAVOPBR 



Diagram 23-1 1. Page I/O Completion Processing (IEAVIOCP) (Part 1 of 2) 
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PCB not fully processed. 
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queue. 



4 Take suspended routines out of page 
wait supplying an error indication. 




5 When all page-in PCBs have been 
processed, free the new frame. 



6 If any PCB cannot be completely 
processed, reschedule this routine. 
Otherwise, free the PCBs from the 
I/O active queue and return. 



Diagram 23-1 1. Page I/O Completion Processing (IEAVIOCP) (Part 2 of 2) 



sr 

a 

o 
O 



Extended Description 

The Page I/O Completion Processor (IEAVIOCP) processes 
all page-in I/O completion events. 

1 PIOCP establishes the FRR and gets the SALLOC lock. 
If requested, it also gets the local lock. Then PIOCP 

searches the local I/O active queue for the current address 
space, and searches the common I/O active queue for PCBs 
that have l/O-complete flags set. 

2 PIOCP checks the PCBs found. If a stage 2 swap-in 
PCB is found that has not been intercepted, PIOCP 

sets the RBN in the PGTE. 

PIOCP processes all related PCBs by checking for one of 
three conditions: 

• The free-real storage flag is set. 

• The VBN is zero. 

• The virtual page represented by the PCB is already valid. 

If none of the conditions occur, PIOCP validates the page 
by setting the protection keys in the XPTE and setting to 
zero the page-invalid flag in the PGTE. Then PIOCP notifies 
the routine in the PCB that the I/O operation is complete. 
If the reset flag is on, PIOCP calls the reset routine of PCIH 
to release the routine that page-faulted. If the PCB has a 
root PCB, the PCB count in the root PCB is decreased by 
one. If the count becomes zero, PIOCP calls the root exit 
routine. 
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Extended Description 

3 As each PCB is processed, PIOCP frees it or enqueues 
it to an I/O active queue and calls a subroutine of 

IEAVPIOP to reschedule IEAVIOCP to complete processing. 
Finally, PIOCP frees the input PCB unless it is to be kept. 
Then PIOCP returns control to the dispatcher. 

4 For I/O errors, PIOCP notifies the routine specified in 
the PCB that the operation completed with an error. 

PIOCP also performs processing for swap-in and fix PCBs. 

5 When each PCB has been processed, PIOCP frees it or 
leaves it enqueued. When all PCBs are processed — and 

if all PCBs for the real frame have been freed — PIOCP frees 
the real frame. Note that during I/O error processing, when 
PFTFXCT is decremented to zero, the system fix counters 
are also decremented. 

6 If any PCBs cannot be freed, PIOCP calls IEAVPIOP to 
schedule IEAVIOCP again. Then PIOCP returns control 

to the dispatcher. 
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Diagram 23-12. Page Services Interface (IEAVPSI) (Part 1 of 2) 
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Diagram 23-12. Page Services Interface (IEAVPSI) (Part 2 of 2) 

Extended Description Module 

The Page Services Interface routine (IEAVPSI) processes all 
input requests for page service functions (PGFIX/PGLOAD, 
PGFREE, PGRLSE). Input is placed in a common internal 
work area (CIWA). All exit processing is done in the module 
also. 



1 When entered via an SVC 112, PSI gets the SALLOC 
lock and checks the requestor's authorization. If the 
requestor is not authorized, PSI returns a code of 4 in reg- 
ister 15. Otherwise, it sets up the virtual subarea list (VSL) 
entry in the CIWA and calls IEAVRELS. When entered via 
an SVC 113, PSI verifies that the ECB passed as input is in 
storage, gets the SALLOC lock, and checks the caller's 
authorization. PSI returns a code of 16 in register 15 if the 
caller is not authorized and the request is PGFIX or 
PGFREE or if the Real Address option is specified on a 
PGFIX or PGFREE request or for any other parameter 
error. If this validity check is successful then PSI sets up the 
CIWA with data from the VSL. When entered via a branch 
entry from a non-RSM routine for page services, PSI vali- 
dates any ECB input and gets the SALLOC lock. If the Real 
Address option is specified for PGFIX or PGFREE, PSI 
returns a code of 16 in register 15 and issues an ABEND. 
If the validity check is successful, it sets up the CIWA and 
sets up and checks VSL entries. 

When entered via a branch entry from an RSM routine, 
PSI checks any ECB input and constructs a VSL in the 
CIWA. 
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Extended Description 

2 PSI tests the operation and option bits in the CIWA 
for validity. Then it calls the page service functions 

requested by the operation flags in the CIWA. Any invalid 
bit combination results in PSI returning a code of 16 in 
register 15 and issuing an ABEND. 

3 When a return is made from the function routine, PSI 
examines the return code. If supplied, it posts the 

input ECB. If the return code is an error code, PSI requests 
abnormal termination with a completion code of x'171' 
and a reason code in register 15 for the requestor. If the 
caller was unauthorized, PSI sets an abnormal termination 
code of x'271'. If return code 8 is to be issued, indicating 
asynchronous completion of the request, PSI fixes the input 
ECB. Finally, PSI returns control to the caller or to the 
EXIT routine. 
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Diagram 23-13. PGFDC/PGLOAD Processor (IEAVFXLD) (Parti of 2) 
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Diagram 23-13. PGFDC/PGLO AD Processor (IEAVFXLD) (Part 2 of 2) 

Extended Description Module Label 

The PGFIX/PGLOAD Processor routine (IEAVFXLD) 
handles requests for bringing virtual pages into real storage. 
The PGFIX processor also fixes the page in real storage. 



1 FXLD checks the pages to be sure they are GETMAIN- 
assigned and, for PGFIX, not VIO pages. Otherwise, 

FXLD returns a code of 4 to the exit processor. For pages 
with frames in real storage, FXLD fixes virtual pages not 
already fixed or re-fixed pages that are already fixed. It does 
this by increasing the fix count in the PFTE for the frame 
and by creating (or updating) a fix ownership element 
(FOE), which it enqueues to the fix ownership list (FOL) 
pointed to by the requestor's TCB. If the page is being 
requested for a long fix and is in a V=R area, FXLD creates 
a PCB and sets the long-fix flag to one, so the real frame 
can be moved out of the V=R area. If the page is not in a 
V=R area, FXLD sets the long fix flag in the PFTE to one. 
If the fix count in the PFTE is currently zero indicating that 
the frame is not already fixed, the system fix counters are 
updated (incremented by one). 

2 When a virtual page is not in real storage, FXLD 
searches the internal PCB queue for a PCB for the page 

being processed. If a PCB is found, FXLD increases by one 
the fix count in the PCB and the FOE, if it is a PGFIX 
request. If a PCB is not found, FXLD creates one and initial- 
izes it. For a PGFIX request, FXLD also creates and initial- 
izes an FOE. 

If an ECB address is specified, FXLD checks for an existing 
root PCB. If none exists, FXLD creates one and initializes 
it. FXLD associates the regular PCB with the root PCB and 
increases the count of PCBs in the root PCB. 



IEAVFXLD IEAVFXLD 



Extended Description 

3 If errors occur, FXLD puts each PCB it created and its 
associated root PCB on the available queue. For PGFIX 

requests, FXLD frees the FQE. If the return code in the 
CIWA is 4, it sets the error flag in the CIWA copy of the 
input virtual subarea list (VSL) entry; the CIWA copy of 
the VSL entry is copied over the user copy. Also, the 
CIWA return code is saved. FXLD calls IEAVFREE to 
free any virtual pages fixed before the error. Then FXLD 
returns control to IEAVPSI. 

4 If no errors have occurred, FXLD passes any PCBs 
created to IEAVGFA, which attempts to allocate real 

frames. If successful, IEAVGFA marks the PFTEs for the 
PGFIX requests. 

5 FXLD returns control to PSI, indicating processing is 
completed and specifying normal or asynchronous 

completion. 
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Diagram 23-14. PGFK/PGLOAD Root Exit (IEAVFXLD) (Part 1 of 2) 
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Diagram 23-14. PGFIX/PGLOAD Root Exit (IEAVFXLD) (Part 2 of 2) 

Extended Description Module Label 

The PGFIX/PGLOAD Root Exit (a part of IEAVFXLD) com- 
pletes processing of a root page control block (PCB) when 
the PCB count has been decreased to zero. The local and 
SALLOC locks are held by the caller. RSM routines that 
use this exit are: IEAVPIOP. IEAVIOCP, IEAVSOUT. 
IEAVGFA, and IEAVTERM. 



1 If the intercept flag is set to one in the root PCB, go 
to step 3. If the intercept flag is set to zero, the FXLD 

Root Exit checks for an I/O error. If the request is for 
PGLOAD, FXLD Root Exit continues with normal process- 
ing. If the PGFIX request has an I/O error, the FXLD Root 
Exit schedules abnormal termination for the requestor, using 
the TCB address in the root PCB. If the TCB address is zero, 
FXLD Root Exit posts the requestor's ECB from the root 
PCB with an error POST code. 

2 If both the intercept flag and the I/O error flag are set 
to zero, the FXLD Root Exit posts the requestor's 

ECB with a zero POST code, indicating completion. 

3 If the free ECB flag is set to one in the root PCB, the 
FXLD Root Exit issues a PGFREE request through 

IEAVPSI. 

4 The FXLD Root Exit converts the root PCB to a 
regular PCB and returns it to the free queue. 

5 The FXLD Root Exit returns control to the calling 
routine. 
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Diagram 23-15. PGFREE Routine (IE AVFREE) (Part 1 of 2) 
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page. 

• If PCB on GFA Defer Queue, 
free PCB. 
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decrement PFTE fix count for 
corresponding PFTE. 



3 Return, indicating status of 
processing. 
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Diagram 23-15. PGFREE Routine (IEAVFREE) (Part 2 of 2) 

Extended Description Module 

The PGFREE routine (IEAVFREE) is called through Page 
Services Interface to free up a group of real pages previously 
fixed. When called by the PGFIX function, it also reverses 
a partially completed fix operation that is being abnormally 
terminated. 



1 PGFREE checks the status of the page being processed. 

If the page is not already in real storage and PGFIX is 
the caller, PGFREE returns control immediately. If PGFIX 
is not the caller and if the requestor supplies an ECB address, 
PGFREE performs purge processing as in step 2. Otherwise, 
PGFREE returns control. 

If the page is valid in real storage, PGFREE checks the page 
location. If the page resides in the nucleus, system queue 
area, local system queue area, or V=R area, then PGFREE 
does not process the page. Otherwise, IEAVFREE locates 
a fix ownership element (FOE), if one exists. If no FOE 
exists on the fix ownership list (FOL), PGFREE does no 
free processing. Otherwise, PGFREE decreases the fix count 
and frees the FOE if the count becomes zero. Then PGFREE 
decreases the fix count in the PFTE, unless PGFIX is the 
caller. If the PFTE fix count becomes zero and the page was 
long-fixed, the long fix flag is set to zero and the system 
fix counters are decremented by one; if a deferred release 
was specified, PGFREE calls the PGRLSE processor to 
perform deferred release processing. 
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Extended Description 

2 If the requestor supplies an ECB address, PGFREE 
checks three queues for PCBs representing paging I/O 

for the current address space: General Frame Allocation 
(GFA) queue, the Common I/O Active Queue, and the 
Local I/O Active Queue. When it finds one, PGFREE checks 
for a root PCB and marks the root PCB intercepted, which 
prevents posting the ECB. 

If the root PCB has an FOE associated with it, PGFREE 
calls FOEDEL to find and remove all FOEs for the PGFIX 
request being purged. FOEDEL is called repeatedly until 
the PCB fix count is zero. PGFREE either frees the PCB 
from the GFA Defer Queue or decreases the PFTE fix 
count for the frames assigned to the virtual page on the I/O 
active queues. If the PFTFXCT is decremented to zero, 
the system fix counters are decremented by one. 
PGFREE checks for related PCBs as well, continuing 
until all three queues have been searched. 

3 If an error is detected in the input data for list entry 
requests, PGFREE sets the error flag in the CIWA 

copy of the VSL entry and stores the whole VSL entry 
over the user-supplied copy. The CIWA return code of 4 is 
also saved. Then PGFREE returns to PSI for exit processing. 
If no errors occur, PGFREE passes the return code and out- 
put data to the caller, PGFIX or PSI, for exit processing. 
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Diagram 23-16. PGOUT Routine (rEAVOUT) (Parti of 2) 
Input 



From Page Services 
Interface Routine (IEAVPSI) 
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Auxiliary Storage Management 
(ILRINTOO) for page-out. 
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Diagram 23-16. PGOUT Routine (IEAVOUT) (Part 2 of 2) 
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Extended Description 

The PGOUT routine (IEAVOUT) is called by the Page Ser- 
vices Interface routine to process a page-out for a selected 
virtual page. 

1 PGOUT processes each VSL entry in the CIWA. It 
checks and rounds the addresses to page boundaries; 

if an error is detected, PGOUT sets the CIWA return code 
to 4. 

For a page with a frame assigned in real storage, PGOUT 
invalidates the PGTE using the Page Invalidation routine. 
If the page resides in the nucleus, SQA, V=R space, LSQA, 
or quick start area, or if the page is unusable or fixed, no 
processing is done. If a PCB already exists, no processing 
is performed. 

2 If the page is unchanged, PGOUT returns the PFTE for 
the frame to the available frame queue. If the Keepreai 

option flag in the PCB or the internal Keepreai flag is set 
to one, PGOUT validates the PGTE and returns control. 



Module 



Label 



IEAVOUT 



Extended Description 

3 If the page has been changed, PGOUT builds a PCB 
and initializes fields in the PCB and XPTE. 

4_ When the first VSL entry is complete, PGOUT checks 

the CIWA return code. For a zero return code, PGOUT 
gets the next VSL entry by using the Page Services Interface 
NEXTVSL subroutine; for a return code of 8, PGOUT per- 
forms exit processing; and for all other return codes, PGOUT 
performs error processing. 

5 PGOUT puts the created PCBs on an internal queue 

and, when all VSL entries have been processed, passes 
them to the Auxiliary Storage Manager by calling 
ILRPAGIO. 

Q If no errors have occurred, PGOUT returns control to 
PSI, putting the return code in the CIWA. If an invalid 
page address was detected, and the CIWA return code is 4, 
PGOUT sets the CIWA error flag to one and copies the CIWA 
copy of the VSL entry over the user copy. Then PGOUT 
returns to PSI. 
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Diagram 23-17. Swap-In Processor Routine (IEAVSWIN) (Part 1 of 2) 
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4 Build stage 2 PCBs for pageable 
private area pages and chain from 
the swap-in root PCB. 

5 Call IEAVGFA to assign real frames 
to the stage 1 pages and start 

page in. 



6 Return, if successful. 



7 If enough PCBs or frames could not 
be obtained, notify SRM via 
SYSEVENT that swap-in failed, and 
return. 

8 If an I/O error occurs, Swap-In calls 
R/TM to terminate the address space. 
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Diagram 23-17. Swap-In Processor Routine (IEAVSWIN) (Part 2 of 2) 

Extended Description Module Label 

The Swap-In Processor routine (IEAVSWIN) initializes I/O 
operations for an address to be swapped in (made active 
within an address space). 



1 After freeing the input SRB and establishing the FRR, 
Swap-In gets the SALLOC lock. If the swap-in request 

is valid, Swap-In gets enough PCBs for the swap-in operation. 

2 Swap-In puts the root exit address and the ASCB 
address in the root PCB. 

3 Swap-In initializes PCBs for Stage I pages to be swapped 



4 Swap-In initializes Stage II page PCBs for swapping in 
and chains them from the swap-in root PCB. The 

Stage 2 PCBs will be passed to IEAVSWPP (an entry point 
in IEAVSWIN) in the IEAVSWPP SRB. 

5 Swap-In calls IEAVGFA to assign real frames and 
initiate the page-in process for the stage 1 pages. 

Q If the I/O successfully completes, Swap-In updates the 

count of swap-ins in the PVT, releases the SALLOC 
lock and the FRR, and returns control to the Dispatcher. 

7 If Swap-In cannot get enough PCBs to swap in the 
address space or if there are not enough real frames 

available, Swap-In issues a SYSEVENT to notify SRM that 
the swap-in failed. 

8 If an I/O error occurs, Swap-In calls R/TM 
(TYPE=MEMTERM) to terminate the address space. 
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Diagram 23-18. Swap-In Root Exit (IEAVSWIN) (Part 1 of 2) 
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If page-ins have completed with an 
error, the system fix count is 
decremented by one and the address 
space is terminated. Go to step 5. 



Update the ASCB, SGT, PGT, and 
XPT for stage I pages and set storage 
keys of the frames. 



3 Add to the ready queue the ASCB 
for the swapped -in address space. 



4 Allow SRBs to be dispatched in new 
address space. 



5 FreePCBs. 

6 If normal swap-in processing has 
completed, schedule IEAVSWPP to 
post the Region Control Task to run 
in the swapped-in address space and 
to start the I/O for the stage 2 pages. 

7 Return. 
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Diagram 23-18. Swap-In Root Exit (IEAVSWIN) (Part 2 of 2) 

Extended Description Module 

The Swap-In Root exit (part of IEAVSWIN) is called by 
Page I/O Post when I/O for Stage I pages has completed. 
The routine re-initializes the segment and page table entries, 
re-enqueues the ASCB, and makes the swapped-in address 
space dispatchable. 



Label 



1 If page-ins have completed in error, Swap-In Root 
Exit decreases the fix counts for the common area 

swap-in pages and completes error processing in step 5. 

2 Swap-In Root Exit updates the ASCB, the PGT, and 
XPT with information about the swap-in Stage I 

pages. It then validates the PGT and XPT and sets the stor- 
age keys for the page frames. 

3 Swap-In Root Exit calls ASCBCHAP to add the ASCB 
to the ready queue. 

4 Swap-In Root Exit calls STATUS START to allow 
SRBs to be dispatched in a new address space. 

5 Swap-In Root Exit frees the root PCB and the chain of 
PCBs used for the swap-in. 
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5 If the swap-in was successful, IEAVSIRT schedules 

an SRB routine, IEAVSWPP, to the swapped-in 
address space. This routine posts the RCT to begin 
restore processing and start the I/O for the stage 2 pages. 

7 Swap-In Root Exit returns control to the caller. 



Diagram 23-1 8A. Swap-In-Post Processor (IEAVSWPP) (Part 1 of 2) 
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Diagram 23- 18 A. Swap-In-Post Processor (IE AVSWPP) (Part 2 of 2) 
Extended Description Module Label 



The Swap-Post processor (IEAVSWPP) initiates the I/O 
for the stage 2 pages and posts RCT when stage 1 
swap-in is complete. 

1 Free the input SRB. 

2 For each PCB on the input stage 2 queue, call 
IEAVFP2 to obtain the PGTE/XPTE addresses for 

the page represented by the PCB. If the page was freed 
or the page is already in storage, free the PCB because 
the real frame assignment for this request is no longer 
required. 

3 Call IEAVGFA to assign frames for the remaining 
stage 2 pages. 

4 Post RCT to indicate that stage 1 swap-in is 
complete and that restore processing can now be 

started. 
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Diagram 23-19. Swap-Out Processor Routine (IEAVSOUT) (Part 1 of 4) 



o 

< 
to 

VI 

«< 



From RCT Quiesce 
Routine (I EAVAROO) 



< 
o 

5* 
3 



00 

o 

-4 



Output 




SPCT 



>v" ?:<%&&&a£l^&> : - <*■&'*.■<- *■ '1 



Free Queue 



t2$ 
1 



PCB 




PFTE 












1 














I/O Active Queues 
PCBs 



Diagram 23-19. Swap-Out Processor Routine (IEAVSOUT) (Part 2 of 4) 



Extended Description 



Module 



Label 



The Swap-Out Processor routine (IEAVSOUT) performs and 
initiates the process of logically disconnecting an address 
space, initiating the I/O operation for page-out to auxiliary 
storage, and saving in real storage the information required 
for a subsequent swap-in. 



1 Swap-Out calls STATUS to stop non-quiescable 
SRBs. Then it gets the SALLOC lock and sets the 
FRR. If the swap request is valid, swap-out calls IEAVPCB 
to get enough PCBs for all the frames in the address space 
plus one to be used as a swap-out parameter list. The list 
will contain a pointer to the LSQA PCBs, a pointer to the 
private area non-LSQA PCBs, an eight-byte parameter list 
passed to SRM on the swap-out complete sysevent, and an 
SRB used to schedule IEAVPIOI. 



IEAVSOUT 



a 

o 
O 



2 Swap-Out initializes the SPCT and then builds SPCT 
entries for each Stage I page (either LSQA or fixed). 

3 Swap-Out scans the Common I/O Queue for PCBs 
corresponding to the address space being swapped out. 

Swap-Out calls the Reset routine of PCIH and resets any 
fix indicators. If I/O is complete, Swap-Out frees the PCB. 
Then Swap-Out scans the I/O active queue and the GFA 
Defer Queue, processing PCBs in the same manner. If any 
root PCB count goes to zero, Swap-Out calls the root exit 
routine. 

4 If a fixed frame has no FOE, Swap-Out sets the fix 
count in the SPCT fix entry. 
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Diagram 23-19. Swap-Out Processor Routine (IEAVSOUT) (Part 3 of 4) 
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Diagram 23-19. Swap-Out Processor Routine (IEAVSOUT) (Part 4 of 4) 
Extended Description Module Label 

5 Swap-Out completes the initialization of swap-out 
PCBs for LSQA and fixed pages. 

Q For pageable frames with no PCB defined, Swap-Out 

either frees the frame or creates a Swap-Out PCB. 
After updating the PGTE and XPTE for each page, Swap- 
Out marks the SPCT entry so that the page will be swapped 
in with the address space. 

7 Swap-Out frees any PCBs not used and puts the swap- 
out PCBs on the local I/O active queue. Then swap- 
out invokes ASM at I LRPAG 10 to initiate the I/O for the < - 
non-LSQA pages. {2 

© 

8 Swap-out schedules IEAVPIOI to start the I/O for the Jx, 
LSQA pages and to remove the address space from 3 

the dispatching queue. IEAVPIOI receives the swap-out 
parameter list containing a pointer to the LSQA PCBs. 

9 Swap-Out frees the unused SPCT extensions, frees 
the unused SPCT extensions, frees the SALLOC lock 

and FRR, and returns control to RCT Quiesce with a return 
code in register 15. 
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Diagram 23-20. Swap-out Completion Routine (IEAVSWPC) (Part 1 of 2) 
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Diagram 23-20. Swap-out Completion Routine (IEAVSWPC) (Part 2 of 2) 

Extended Description Module Label 



The Swap-out completion routine (IEAVSWPC) handles 
completion processing for swap-outs. The input is the 
address of a chain of AlAs and a return code. IEAVSWPC 
is entered from the Swap-Out Processor (EAVSOUT) or 
from ILRSWAP. The SALLOC lock is held at entry. 

1 SWPC established the RSM FRR and calls IEAVINV 
to purge the translation lookaside buffers (TLBs). 

2 If the I/O was successful, I EAVSWPC issues a 
SYSEVENT notifying the system resource manager 

(SRM) that the swap-out has been completed and passes 
status information to SRM about the swapped-out 
frames. 

3 For either a successful or unsuccessful swap-out, 
IEAVSWPC frees the area (PCB) containing the 

swap-out parameter list by calling the PCB manager 
(IEAVPCB). 

• The PCB defined flag is turned off in the PFTEs for 
the frames that were allocated to the swapped out 
pages. If the I/O was successful, IEAVSWPC calls 
PFTE enqueue/dequeue to free the frames and calls 
IEAVPCB to free the PCBs used for the swap-out. 
The system fix counters are decremented by 1 for 
each AIA passed as input. 

• If the I/O was unsuccessful, IEAVSWPC does not 
free the frames. 
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4 If a nonzero return code was given to IEAVSWPC, 
a COD abend is issued. 

The address space being swapped out is terminated via 
CALLRTM. 



IEAVSWPC MMTERM 



5 IEAVSWPC removes the FRR and returns to the 
caller. 
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Diagram 23-21 . LSQA Swap I/O Initiator (IEAVPIOI) (Part 1 of 2) 
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4 Free the local and SALLOC 
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return. 



5 For errors, invoke IEAVSWPC 
for cleanup and address space 
termination. 



6 Free the local and SALLOC 
locks, delete the FRR, and 
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Diagram 23-21 . Swap I/O Initiator (IEAVPIOI) (Part 2 of 2) 

Extended Description Module Label 

The Swap I/O Initiator (IEAVPIOI) starts the LSQA paging 
I/O for the address space being swapped out. The input 
is the address of the swap-out parameter list containing a 
pointer to the LSQA PCBs. IEAVPIOI passes the 
PCB/AIAs to ASM to start the swap-out I/O. 
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PIOI establishes the RSM FRR, and gets the local I EAVPIOI I EAVPIOI 

lock. 

PIOI calls ASCBCHAP to remove the address space 
from the dispatching queue. 

PIOI obtains the SALLOC lock and calls ASM 
(ILRSWAP) to perform the page-out I/O. 

I 4 If the I/O is successful, PIOI releasess the SALLOC 
and local locks, removes the FRR, and returns 
control to the Dispatcher. 

5 If an error occurs, or if the ASCBCHAP fails, 
IEAVPIOI calls IEAVSWPC for cleanup processing and 
for terminating the address space. 

6 PIOI releases the local and SALLOC locks, removes 
the FRR, and returns control to the dispatcher 

flEAVEDSO). 
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Diagram 23-22. VIO Services Routine (IEAVAMSI) (Part 1 of 4) 
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Diagram 23-22. VIO Services Routine (IEAVAMSI) (Part 2 of 4) 



Extended Description 

The VIO Services routine (IEAVAMSI) manipulates the 
page and external page tables; in some cases it also manip- 
ulates the page frame table for the VIO Processor when 
VIO data set pages are to be inserted or removed from the 
VIO buffer. One VCB (VIO Control Block) is supplied for 
each page to be processed. 

1 VIO Services obtains the global SALLOC lock and 
checks the input VCB to be sure that the real storage 

address specified is valid. 

2 VIO Services checks the operation flags in the VCB 
for the operation to be performed. 

3 For an assign request, VIO Services checks for the 
following conditions: 

• GETMAIN-assigned flag and invalid flag in PGTE are set 
to one; 

• Real storage address in PGTE is zero; 

• Auxiliary-storage-assigned and the defer flags in the XPT 
are set to zero. 

If any of the preceding conditions are not met, VIO Services 
sets an error code in the VCB and returns to VBP with a 
code of 4 in register 1 5. 
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Extended Description 

4 If a null assignment is requested (LPID in VCB is zero), 
VIO Services sets the VIO flag to one in the XPTE and 
checks for further VCBs. 

Otherwise, if the RSN in the VCB is not zero, VIO Services 
gets the PFTE for the real frame that last contained the page. 
It checks to see whether the VIO flag is set to one and 
whether the data set ID matches the ID in the VCB. If so, 
the page has been reclaimed. 

If a PCB exists for the reclaimed PFTE, VIO Services updates 
the PCB to halt the page-out from freeing the real frame. It 
also updates the XPTE and the PGTE. Finally, VIO Services 
puts the virtual address of the VCB and the ASID in the 
PFTE. 
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Diagram 23-22. VIO Services Routine (IEAVAMSI) (Part 3 of 4) 
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Diagram 23-22. VIO Services Routine (IEAVAMSI) (Part 4 of 4) 

Extended Description Module Label 

5 VIO Services returns to VBP, passing a return code in 
register 15. 

Q If the page is not in real storage, VIO Services transfers 
RSM-created auxiliary storage as required and sets the 
real storage address in the VCB to zero. 

If paging I/O is in process for the page, VIO Services quiesces 
page-in I/O and allows page-out I/O to complete normally. 
VIO Services processes all PCBs for the page according to 
the queue on which they reside. VIO Services releases all 
non-VIO auxiliary storage for the page and updates the 
VCB and the XPTE. 

7 VIO Services updates status flags in the XPTE, VCB, 
PGTE, and the PFTE to complete the Move-Out 

request according to the options specified in the VCB. 

8 When all VCBs have been processed, VIO Services 
passes any AlAs created to ASM (at ILRINTOO) 

for page-out I/O processing. Then it returns to VBP, 
passing a return code in register 15. 



Diagram 23-23. Initialize Address Space Routine (IE A VITAS) (Part 1 of 2) 



o 

< 

C0 



r 

5 s 

>-« 

pa 



Input 



From VSM 

Create Address Space 

(IEAVGCAS) 



Register 



ASCB 



Process 



Output 



Register 14 



** 



Return Address 



Z> i 



^> 4 



Initialize RSM header and 
SPCT, then request real frame 
assignment. 



2 Initialize PFTE as an LSQA 
page and enqueue it on the 
LSQA frame queue. 



3 Build the initial LSQA page 
for the new address space. 
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Diagram 23-23. Initialize Address Space Routine (IEAVITAS) (Part 2 of 2) 

Extended Description Module Label 

The Initialize Address Space routine (IEAVITAS) builds and 
initializes the RSM control blocks required to define an 
address space. The function runs in the Master Scheduler 
address space, is called in supervisor, key state, and must 
run under a local lock. 



1 The Initialize routine sets up linkage with the RSM 

FRR IEAVRCV and acquires the SALLOC lock. 
Initialize obtains SQA space for the RSM Header (the 
ASM Header is part of the RSMHD) and the Swap Control 
Table (SPCT). If the GETMAIN fails. Initialize returns 
with a code of 4 in register 15. Then it calls ASM 
(ILRINTOO) to assign a logical group number for the new 
address space. If none are available. Initialize returns to 
the caller with a code of 4 in register 15. It Initializes the RSM 
Header address in the ASCB and initializes RSM Header 
fields with the virtual addresses of the SGT, SPCT, 
and ASCB. Initialize then sets other RSM Header fields to 
zero. The ASM slot reserve routine (ILRSLTRV) is called 
to assign reserved slots for the address space. Next, the 
Initialization routine calls LSQA/SQA Allocation 
(IEAVSQA) to get a real frame. If the allocation fails, 
Initialize returns a code of 4 to the caller in register 15. 
If successful, Initialize initializes the segment table address 
in the ASCB. 



IEAVITAS 



Extended Description 

2 Initialize inserts into the page frame table entry the 

virtual block number of the page with the highest 
address in the new address space private area and the ASID 
of the new address space, and sets the LSQA flag to one. 
Then Initialize calls PFTE Enqueue/Dequeue (IEAVPFTE) 
to put the PFTE on the new address space's LSQA queue. 



|3 



Initialize sets the LSQA page to zero and clears the 
storage keys. It initializes the common area portions of 
the segment table and marks the private area portions invalid. 
Then Initialize sets up the SGTE for the private area contain- 
ing the LSQA page. It initializes the page table last and all 
other pages invalid. It then initializes the external page table 
by putting the logical group number in each 12 byte entry. 
Initialize sets up fields in the SPCT for the active segment 
count, the segment entry count, the page table address, the 
segment ID, and the SPCT size. The local (RSMCNTFX) 
and global (PVTCNTFX) system fix counters are also 
updated. 

I 4 Initialize deletes linkage to the RSM FRR, frees the 
SALLOC lock, and returns to the caller. 

Error Processing 

If an error occurs, the Initialize routine restores any success- 
ful set-up operations to their status before the error occurred. 
It frees any real frame obtained, releases the logical group 
number, and frees the SQA space before returning to the 
caller with a code of 4 in register 1 5. 
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Diagram 23-24. Delete Address Space Routine (IEAVDLAS) (Part 1 of 2) 
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Diagram 23-24. Delete Address Space Routine (IEAVDLAS) (Part 2 of 2) 

Extended Description Module Label 

The Delete Address Space routine (IEAVDLAS) returns 
RSM resources associated with an address space being ter- 
minated. It runs in the Master Scheduler address space. 



1 Delete moves the local l/O-active queue for the 
address space to the Master local l/O-active queue. 

2 Delete scans the local frame queue and calls IEAVPFTE 
to dequeue PFTEs on the queues, freeing them if no 

PCB has been defined. If no PCB is defined, the local 
(RSMCNTFX) and global (PVTCNTFX) fix counters are 
decremented for each LSQA and PGFIX frame. If any PCBs 
exist on the Local I/O Active Queue, Delete moves them to 
the Master Scheduler I/O Active Queue and changes their 
ASCB addresses to the Master Scheduler ASCB address. 
Then it sets to zero the RSM Header address and the real 
segment table address in the ASCB. 



IEAVDLAS IEAVDLAS 



Extended Description 

3 Delete calls the Page Invalidate routine, IEAVINV, to 
purge all translation lookaside buffers. 

4 Delete uses FREEMAIN to free the SQA space used 
for the RSM Header, the SPCT, and any SPCT 

extensions. 



Module 
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IEAVGMOO 



Label 



Delete returns control to RSM Termination. 



6 If the SRB was scheduled to dispatch IEAVSWPP 
to start the stage 2 swap-out, Delete obtains the 

SALLOC lock and the PCB manager frees the string of 
PCB/AIAs addressed in the SRB. Then Delete releases 
the SALLOC lock. 

7 Delete frees the SRB using the FREECELL routine. 

8 Delete returns control to the PURGEDEQ routine. 
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Diagram 23-25. Page Termination Services Routine (IEAVTERM) (Part 1 of 2) 
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Diagram 23-24. Delete Address Space Routine (IEAVDLAS) (Part 2 of 2) 

Extended Description Module Label 

The Delete Address Space routine (IEAVDLAS) returns 
RSM resources associated with an address space being ter- 
minated. It runs in the Master Scheduler address space. 

1 Delete moves the local l/O-active queue for the 
address space to the Master local l/O-active queue. 

2 Delete scans the local frame queue and calls I EAVPFTE 
to dequeue PFTEs on the queues, freeing them if no 

PCB has been defined. If no PCB is defined, the local 
(RSMCNTFX) and global (PVTCNTFX) fix counters are 
decremented for each LSQA and PGFIX frame. If any PCBs 
exist on the Local I/O Active Queue, Delete moves them to 
the Master Scheduler I/O Active Queue and changes their 
ASCB addresses to the Master Scheduler ASCB address. 
Then it sets to zero the RSM Header address and the real 
segment table address in the ASCB. 



Extended Description 

3 Delete calls the Page Invalidate routine, IEAVINV, to 
purge all translation lookaside buffers. 

4 Delete uses FREEMAIN to free the SQA space used 
for the RSM Header, the SPCT, and any SPCT 

extensions. 

5 Delete returns control to RSM Termination. 

6 If the SRB was scheduled to dispatch IEAVSWPP 
to start the stage 2 swap-out. Delete obtains the 

SALLOC lock and the PCB manager frees the string of 
PCB/AIAs addressed in the SRB. Then Delete releases 
the SALLOC lock. 

7 Delete frees the SRB using the FREECELL routine. 

8 Delete returns control to the PURGEDEQ routine. 
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Diagram 23-25. Page Termination Services Routine (IEAVTERM) (Part 1 of 2) 
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Diagram 23-25. Page Termination Services Routine (IEAVTERM) (Part 2 of 2) 

Extended Description Module Label 

The Page Termination Services (PTS) routine (IEAVTERM) 
is called by the Recovery /Termination Manager to quiesce 
paging I/O for an RB or TCB within a virtual address space 
or for an entire virtual address space. The routine may also 
free pages fixed by the TCB being quiesced. 



1 PTS gets the SALLOC lock, sets up the RSM FRR, 
and gets the local lock. PTS terminates any swapping 

operations. For a swap-in, the RSM-failed flag is turned on. 
For a swap-out, the SRM parameter list is freed. For an 
ASCB purge, PTS releases the local lock. 

2 PTS searches for PCBs that have ASCB and TCB or 
RB addresses matching the input data. It searches the 

GFA Defer Queue and the I/O active queues. When a PCB 
is found, PTS processes it according to the queue it is on 
and the purge type. 



IEAVTERM IEAVTERM 



Extended Description 

3 When the purge type is ASCB and the SRB mode flag 
in the PCB is set, PTS will reset the SRB routine if 

reset has been requested. If the purge type is RB and the 
RB address in the PCB matches the input RB address, PTS 
calls the Reset subroutine of PCIH to remove the specified 
routine from page wait. For all PCBs for which no I/O has 
started, PTS processes any root PCB and then frees the 
PCBs. For all PCBs for which I/O is active, PTS flags the 
PCB to cancel the I/O request. If the I/O is complete, PTS 
frees the PCB and the PFTE if there is no other requestor 
for the page. If the purge type is RB, PTS only frees one 
PCB. During I/O purge processing, if a PFTFXCT is 
decremented to zero, the system fix counters are 
decremented by one. 

4 For a TCB purge, PTS frees the FQE for a fix PCB, 
and, if requested, purges all in-storage fixes and FOEs. 

If the PFTFXCT is decremented to zero, the system fix 
counters are decremented by one. 
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5 For an address space purge, PTS calls Delete Address 
Space to clean up the RSM resources and real frames. 

Q PTS returns to the Recovery /Termination Manager. 
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Diagram 23-26. Real Frame Replacement (IEAVRFR) (Part 1 of 4) 



From System 

Resources Manager (SRM) 



Input 



(IRARMSRV) 



< 

5* 
3 



Register 1 



Parameter 
List 



N 



Process 



Output 



Local Frame 
Queue 

PFTE 






Common Frame 
Queue 

PFTE 



Local Frame 

Queue 

PFTEs 




Local Frame 

Queue 

PFTEs 






V 



Select Routine 

1 For each frame queue in the parameter 
list, locate each PFTE and test its 
status flags. 

2 For PFTEs on the common area frame 
queue, or the current address space 
local frame queue, that are eligible 
and selected to be stolen, go to the 
Freepage subroutine to do steps 8—9. 

3 For PFTEs on other local address 
space frame queues that are eligible 
and selected to be stolen, set the 
"pending steal" flag in each PFTE. 

4 If necessary, schedule the Steal 
subroutine to asynchronously steal 
frames whose PFTEs are marked 
"pending steal" 

5 When the PFTEs meeting the input steal 
criteria on all the input frame queues 
have been processed, return to the SRM. 
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Diagram 23-26. Real Frame Replacement (IEAVRFR) (Part 2 of 4) 

Extended Description Module Label 



Extended Description 



Module 



Label 
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Real Frame Replacement (IEAVRFR) scans sets of real 
frames selected by the System Resources Manager (SRM) 
to determine if they are available for stealing. It also 
updates the unreferenced interval count (UIC), when 
requested. It returns to the SRM the count of stolen 
frames. 

1-3 Real Frame Replacement (RFR) gets the SALLOC 
lock. Then, for each entry in the input parameter 
list, its Select routine accesses the local frame queue 
(LFQ) for the specific ASCB, or the common frame 
queue (CFQ) if the ASCB address is zero. The common 
frame queue contains entries for frames used by areas 
such as the PLPA, CSA, and MLPA. Frames represented 
on the local frame queues contain the user private area, 
excluding LSQA. 

RFR processes each PFTE on a queue, and its associated 
frame, in one or more of the following ways (as detailed 
in substeps a— f below) : 

• Skips the frame and doesn't steal it. 

• Increases by one the count of stolen frames. 

• Resets the frame's usage history by zeroing its 
unreferenced interval count (UIC). 

• Increases by one the unreferenced interval count, 
when requested. 

• Flags the PFTE for a "pending steal". 

• Calls the Freepage subroutine (steps 8-9) to steal the 
frame. 

a) RFR determines that the PFTE is ineligible and 
doesn't steal the frame, if any of these conditions 
applies: 

• The frame is fixed (PFTE fix count is not zero). 

• The frame has outstanding I/O (PFTE "PCB-defined' 
flag is set). 

• The frame is part of a nonpageable region (V=R). 

• The frame is already flagged as 'pending steal'. 

• The frame contains a storage error. 



IEAVRFR IEAVRFR 



b) If the frame has been referenced (hardware reference 
bit is on), RFR resets the frame's usage history by 
zeroing the unreferenced interval count (UIC) in the 
PFTE. RFR then processes the next PFTE. (The 
UIC is a count of the number of intervals in which the 
frame's page has not been referenced.) 

c) When SRM requests that the UlCs be updated, 
PFTUIC is incremented by one for each unreferenced 
PFTE in the requested queues. 

d) The count of stolen frames is increased by one. 

If the PFTE belongs to the local frame queues of an 
address space other than the current one, RFR flags 
the PFTE for a pending steal, then processes the next 
PFTE on the queue. (For processing of "pending 
steal" frames, see step 6.) 

If the frame has met the steal criteria (described above), 
RFR calls the Freepage subroutine to invalidate the 
page and steal the frame. (See steps 8—9.) 

e) When all the eligible frames have been stolen from the 
queue being examined, as specified in the input parameter 
list, RFR processes the next frame queue. 

4 The Steal routine is scheduled via an SRB to be run 
in the address space specified by the ASCB address, 

if a non-current local frame queue has PFTEs marked 
"pending steal". (These PFTEs were flagged in substep d, 
above.) 

5 The count of stolen frames is placed in the count 
field of the parameter list entry, for use by the SRM. 

After the entire parameter list has been processed, the 

Select routine releases the SALLOC lock and exits to the SRM. 



Diagram 23-26. Real Frame Replacement (IEAVRFR) (Part 3 of 4) 
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stolen. If so, call the Freepage 
subroutine (steps 8— 9). 

7 When all "pending steal" frames 
have been processed, exit to the 
Dispatcher. 

Freepage Subroutine 

8 Call Page Invalidation (IEAVINV) 

to invalidate the page table entry for 
the page whose frame is to be stolen 
and to determine if the frame is still 
eligible to be stolen. If the frame is 
not still eligible, the page is revalidated 

9 If the page has been changed, it is paged 
out by ASM and the frame is returned 
to the AFQ when the I/O is complete. 
If, however, the page has not been 
changed, the frame is returned to the 
AFQ without paging I/O. Return is 
either to step 2 or step 6. 
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Diagram 23-26. Real Frame Replacement (IEAVRFR) (Part 4 of 4) 
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Extended Description 

g The Steal routine gets the SALLOC lock, frees the 

input SRB, then processes each PFTE marked 
"pending steal" on the local frame queue. It checks the 
"PCB defined" flag, the "storage error" flag, and the fix 
count in the PFTE. If any of these are set, the frame 
cannot be stolen. Steal turns off the steal indicators and 
gets the next PFTE. Otherwise, Steal calls the Freepage 
subroutine (steps 8—9). 

7 When it has processed all "pending steal" PFTEs, 
the Steal routine releases the SALLOC lock and 

returns, via the Dispatcher, to step 5. 

8 The Freepage subroutine invalidates the page by 
calling IEAVINV. Freepage tests the reference 

and change bits to ensure that no reference has taken 
place since the decision to steal the frame. If the page 
has been referenced, it is revalidated, and the PFTE steal 
indicators are reset. 
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Extended Description 

9"^ If the page has been changed but not referenced, 

Freepage calls ASM to write out the page to a 
paging data set, and returns the frame's PFTE to the 
available frame queue (AFQ) when the I/O completes. 
If, however, the page has not been changed, Freepage 
returns the PFTE to the AFQ without any paging I/O. 
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Diagram 23-27. Real Storage Reconfiguration Routine (IEAVRCF) (Part 1 of 4) 
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Diagram 23-27. Real Storage Reconfiguration Routine (IEAVRCF) (Part 2 of 4) 

Extended Description Module Label 

The Real Storage Reconfiguration (RSR) routine (IEAVRCF) 
adds to or subtracts from the real storage frames currently 
available for use by the system. When entered for cancel 
processing, RSR automatically follows with offline 
processing. 



1 After obtaining the SALLOC lock, RSR checks the 

option field in the parameter list for the option 
requested. If entered for a storage key error, RSR calls the 
Reset Storage Key routine to reset the key of any frame 
for which it has key information. It also sets the change 
flag in the frame. If the error is not recovered, RSR sets 
error flags in the PFTE and puts a return code of 8 in 
register 1 5. 



IEAVRCF 



Extended Description 

2 If entered for a storage data error, RSR sets error 
flags in the PFTE. If the frame is unchanged and 

pageable, RSR invalidates the PGTE and puts the PFTE on 
the available frame queue. If the frame contains changed, 
LSQA, or fixed data , RSR sets the pending-status indicator 
and sets a return code of 8 indicating no recovery is possible. 

3 If entered by VARY STORAGE for status processing, 
RSR records status information in the status list. 

4 If entered by VARY STORAGE for cancel process- 
ing, RSR searches for the offline-processing root 

PCB and dequeues it. RSR also posts the ECB with a code 
of 4. 

5 If entered for online processing, RSR sets the online 
flag in each PFTE and puts the PFTEs on the avail- 
able queue. Then it notifies SRM of the new available 
frames. 
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Diagram 23-27. Real Storage Reconfiguration Routine (IEAVRCF) (Part 3 of 4) 
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Diagram 23-27. Real Storage Reconfiguration Routine (IEAVRCF) (Part 4 of 4) 
Extended Description Module Label 

6 If entered for offline processing, RSR checks to see if 
the frame is in use. If it is not, RSR sets the offline 

flag in the PFTE and removes it from the queue it resides 
on. If the frame is in use, RSR sets the offline-intercept 
flag in the PFTE, sets condition indicators in the frame's 
status byte, and builds a root PCB to monitor the request. 

7 RSR returns control to the caller, passing a return 
code in register 15. 



3 RSR is entered from PFTE Enqueue/Dequeue when 

a frame with the PFTE offline-intercept flag set is sent 
to the available frame queue. RSR searches the offline wait 
queue for the corresponding root PCB. If the frame is 
accepted for offline processing, RSR resets the offline- 
intercept flag in the PFTE and decreases by one the PCB 
count in the root PCB. 



IEAVRCF IEARCFI 



Extended Description 

9 When the PCB count in the root PCB becomes zero, 
RSR schedules a POST of the requestor's ECB- 

(A GETCELL was done early in RSR for an SRB area 
for this purpose.) 

10 If the frame has a storage error, RSR removes the 
PFTE immediately, marks it offline, and notifies' 

SRM of the decrease in available frames. 



11 



12 



When all offline-intercept frames are processed, RSR 
returns control to PFTE Enqueue/Dequeue. 



RSR offline completion is scheduled by the offline- 
intercept subroutine of RSR when the frame count 
in the root PCB becomes zero. RSR finds the corresponding 
root PCB and posts the ECB specified in the root PCB. 
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RSR then dequeues the PCB and frees the quickcell 
used for the SRB. 



14 RSR returns control to the Dispatcher. 
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Diagram 23-28. PFTE Enqueue/Dequeue Routine (IEAVPFTE) (Part 1 of 2) 
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Diagram 23-28. PFTE Enqueue/Dequeue Routine (IEAVPFTE) (Part 2 of 2) 

Extended Description Module Label 

The PFTE Enqueue/Dequeue routine (IEAVPFTE) enqueues 
a PFTE (page frame table entry) at the end or the front of 
a specified queue, dequeues a PFTE from a specified queue, 
or moves a PFTE from one queue to another. The routine 
also intercepts PFTEs routed for the available frame queue 
(AFQ) and directs them to special queues or other RSM 
functions requiring the real storage frame represented by 
the PFTE. The caller holds the SALLOC lock. 

IEAVPFTE is responsible for increasing and decreasing 
the allocated frame count for each address space 
(ASCBFMCT) and the common area (PVTCFMCT). It 
will also compute the "page-seconds" information for 
an address space. Page-seconds are the total CPU time 
in milliseconds that each frame has used by an address 
space. Page-seconds are recomputed before each 
change of the local frame count; that is, ASCBFMCT is 
increased or decreased. 



1 The routine first checks for a dequeue, request. If the 
PFTE is on a queue, the specified PFTE is dequeued 

and the QID field in the PFTE is set. If the PFTE was 
dequeued from the AFQ, special processing is done. The 
AFC (available frame count) in the PVT is decreased and 
the PFTONAVQ flag is turned off. If the AFQ is now below 
its safe threshold and a SYSEVENT has not been issued, 
one is issued to notify the System Resource Manager (SRM) 
of the low AFC. If the AFC is zero, a special SYSEVENT 
is issued to notify the SRM of the zero AFC. 

When dequeuing the PFTE from a local frame queue, 
page-seconds are computed and ASCBFMCT is 
decremented by one. If the PFTE is dequeued from 
the common frame queue, PVTCFMCT is decremented. 

2 The routine tests to see if an enqueue operation is 
requested. If the PFTE is not to be enqueued, 

IEAVPFTE returns to the caller. If the TQID is the available 
frame queue ID, IEAVPFTE checks to see if the PFTE has 
been intercepted. If the V=R intercept flag is set, the V=R 
Intercept subroutine of V=R allocation (IEAVEQR) is 
called, passing the RBN of the PFTE. This subroutine 
returns either a zero RBN or the RBN of the PFTE passed 
by the intercept processor. If a zero RBN is returned, the 
frame is intercepted for V=R Allocation; IEAVPFTE 



IEAVPFTE IEAVPFTE 



Extended Description 

returns control to the caller. If the returned RBN is not 
zero, or if the V=R intercept flag was not set, the PFTE 
offline intercept flag is tested. If the offline intercept flag 
is set, the PFTE is passed to Real Storage Reconfiguration 
(IEAVRCF). If the Reconfiguration routine returns a zero 
RBN, the frame has been intercepted for offline or is a 
bad page; IEAVPFTE returns control to the caller. If the 
Reconfiguration routine returns the input RBN, or if V=R 
Allocation returned the RBN and the PFTE offline inter- 
cept flag is not se,t, processing continues. This also occurs 
if no intercept flags are set in the PFTE. IEAVPFTE then 
checks to see if the SQA Reserve Queue requires frames. If 
so, the PFTE is diverted to the SQA Reserve Queue. If 
not intercepted, IEAVPFTE enqueues the PFTE on the AFQ. 
If the input TQID was not X'FF' and was not the AFQ 
ID, then IEAVPFTE puts the TQID in the PFTE and 
enqueues on it on the end of the specified queue. If the 
TQID is X'OO' and the special "head of queue" flag is set, 
the PFTE is placed at the head of the AFQ. If the 
PFTE is to be enqueued to a local frame queue, page- 
seconds are computed and ASCBFMCT is incremented. 
If the PFTE is to be enqueued to the common frame 
queue, PVTCFMCT is incremented. Then IEAVPFTE 
returns to the caller, 

3 If the PFTE is to be queued on the Available Frame 

Queue (AFQ), IEAVPFTE sets to zero the storage 
keys on the real frame, enqueues the PFTE, and increases 
the available frame count (AFC) in the PVT. If a low- 
threshold violation is outstanding, IEAVPFTE checks to see 
if the new AFC is equal to or greater than the safe threshold. 
If it is, IEAVPFTE notifies the SRM that the AFC is suf- 
ficient. Next, IEAVPFTE tests the GFA defer queue. If 
there is a PCB for which defer processing has not been 
scheduled, and whose address space does not have defer 
processing scheduled, then IEAVPFTE schedules GFA defer 
processing with an SRB. Then IEAVPFTE returns to the 
caller. 



Module 
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Diagram 23-29. PCB Manager (IEAVPCB) (Parti of 2) 
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Diagram 23-29. PCB Manager (IEAVPCB) (Part 2 of 2) 

Extended Description Module 

The PCB Manager (IEAVPCB) obtains PCBs (page control 
blocks) from the PCB free queue, dequeues, enqueues, 
and moves PCBs. In addition, the routine attempts to 
maintain a minimum number of PCBs on the free queue 
by replenishing the queue. Entries IEAVREP1 , 
IEAVREP2, and IEAVREP3 are used by RSM routines 
to replenish the SRB pool. 



Label 



1 IEAVPCB checks the input PCB address. If it is zero, 
the caller requests the build option. IEAVPCB checks 
for zero PCBs requested. If zero PCBs are requested and 
IEAVIMIPO is the caller, IEAVPCB builds a pool of PCBs 
in SQA. An internal routine, IEAVREP3, is invoked to 
build and initialize (BLDCPOOL) a pool of SRBs in SQA. 
Step 5 is then performed. If zero PCBs are requested and 
lEAVNIPO is not the caller, a return code of 4 is passed 
to the caller. If it is not a zero PCB request, IEAVPCB 
checks to make sure there are enough PCBs on the free 
queue to satisfy the request. If there are not enough 
PCBs on the free queue, IEAVPCB expands the pool if 
possible, unless the GETMAIN-lnhibit flag is set. If the 
entire request cannot be satisfied, IEAVPCB returns 
control to the caller with a return code of 4. 

If there are enough PCBs on the free queue to satisfy a 
request or if enough have now been obtained, the specified 
number of PCBs are all removed at one time; this prevents 
loss of the chain pointers for PCB requests greater than one. 
The number of PCBs dequeued is subtracted from the free 
queue depth. If the new depth value is below the free queue 
threshold, the GETMAIN inhibit bit is tested. If this flag 
is set, return is made to the caller. If the GETMAIN 
inhibit bit is not set, the PCB Replenish routine is called. 
In either case, return is made to the caller with a zero 
return code. For requests of more than one PCB, the PCBs 
are chained together using the standard chain pointers. All 
PCBs obtained for the caller will be set to zero, except the 
chain pointer fields and the queue number fields which are 
set to X'FF', and the AIAUSER1 field, which points to the 
PCB Address. 



IEAVPCB IEAVPCB 



IEAVPCB IEAVREP3 



Extended Description 

2 For a build request, IEAVPCB obtains SQA space for 
a calculated number of PCBs and for an equal number 

of SRBs. 

3 If the input PCB address is not zero, IEAVPCB performs 
dequeuing or enqueuing based on what the PQN and 

TQN parameters specify. If dequeued, the PCB queue num- 
ber field is set to X'FF'. For enqueuing, the PCB is placed 
at the end of the specified queue. Then IEAVPCB returns 
control to the caller with a return code of 0. 

4 IEAVPCB clears the SQA space to zero and constructs 
the PCBs required. The PCBs are enqueued on the 

free PCB queue and the queue depth is updated. 

5 Return to the caller. 

6 Entry IEAVREP2 is branch entered by RSM 
routines requiring an SRB when the SRB pool has 

been depleted. IEAVREP2 will replenish the pool. 

7 Entry IEAVREP1 is entered via SRB scheduled by 
IEAVPIOP or IEAVREP1 itself to replenish the 

SRB pool. 

8 IEAVREP1 scans the RSMHD in each address space 
to determine if IEAVIOCP should be scheduled. 

When this is necessary, an SRB is obtained from the 
pool (via GETCELL) and IEAVREP1 is scheduled. If 
the GETCELL fails, IEAVREP1 schedules itself (using 
an SRB in the PVT) to replenish the pool. 



Module 



Label 



Diagram 23-30. Page Invalidation Routine (IE AVINV) (Parti of 2) 
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Diagram 23-30. Page Invalidation Routine (IEAVINV) (Part 2 of 2) 

Extended Description Module Label 

The Page Invalidation routine (IEAVINV) performs all 
necessary interprocessor synchronization, sets the page 
table entry invalid bit, and purges the translation lookaside 
buffer on every processing unit in the system. The main 
routine must be entered with the SALLOC lock. This 
routine is entered from the following RSM routines: 
IEAVRFR, IEAVRCF. IEAVOUT, IEAVPIOI, 
IEAVDLAS, and IEAVGFA. 



\ When executing in an MP environment, IEAVINV sets 
its internal indicator to zero and signals all other proc- 
essors in the system to execute the slave subroutine. 

2 The called (slave) subroutine of IEAVINV executing 
on the other processor sets the global spin indicator in 

the LCCA and waits for the internal indicator to be set to 
X'FF'. While waiting, the slave subroutine allows intermit- 
tent emergency signals and malfunction alert signals. When 
the slave subroutine finds X'FF' in the internal indicator, 
it purges its translation lookaside buffer, resets its global 
spin indicator, and returns. 

3 When all other processors are in the slave subroutine, 
or when only one processor is online, IEAVINV sets 

the PGTE invalid bit to one, sets the internal indicator to 
X'FF', and purges its translation lookaside buffer. If the 
PGTE address is zero, no invalidation occurs but the other 
operations take place. Then IEAVINV returns control to 
the caller. 
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Diagram 23-31. Find Page Routine (IEAVFP) (Part 1 of 2) 
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Diagram 23-31. Find Page Routine (IEAVFP) (Part 2 of 2) 

Extended Description Module 

The Find Page routine (IEAVFP) locates the page table 
entry (PGTE) and/or external page table entry (XPTE) cor- 
responding to virtual address. 



1 Find Page gets the virtual address of the page table by 
translating the real address obtained from the segment 

table entry referenced by the virtual storage address. If the 
segment referenced is invalid, Find Page returns control to 
the caller with a return code of 4 in register 1 5. 

2 Find Page calculates the PGTE and XPTE addresses 
from the virtual address of the page table and the page 

number obtained from the virtual address. 

3 When the calculation is complete. Find Page returns 
control to the caller. 
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Diagram 23-32. Translate Real to Virtual Routine (IEAVTRV) (Part 1 of 2) 
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Diagram 23-32. Translate Real to Virtual Routine (IEAVTRV) (Part 2 of 2) 
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Extended Description 



Module 



Label 



The Real to Virtual Translation routine (IEAVTRV) 
provides the virtual storage address and address space 
10 for an input real storage address. No locks are re- 
quired. 

1 Translation of real to virtual checks the real storage 
address input. If the real address exceeds the 

boundaries of real storage. Translation returns to the 
caller with a return code of 4 in register 15. 

2 If the real address is in the nucleus. Translation leaves 
the input address unchanged and sets register 0, the 

ASID, to X'FFFF' to indicate common area storage. If the 
address is not in the nucleus. Translation uses the input 
real address to find the page frame table entry; it then 
locates the virtual address and address space ID associated 
with the PFTE. If the frame is invalid, or on the available 
queue, or offline, or being used by VIO, Translation returns 
a code of 4 in register 15, signifying unsuccessful translation. 

3 Translation returns to the caller with a code of in 
register 15 if translation is successful. 
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V Diagram 23-33. RSM Functional Recovery Routine (IEAVRCV) (Part 1 of 2) 
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Diagram 23-33. RSM Functional Recovery Routine (IEAVRCV) (Part 2 of 2) 



Extended Description 

The RSM Functional Recovery Routine (IEAVRCV) pro- 
vides three services: 

• The recording of software errors in RSM modules. 

• The clean-up of locks and deletion of the FRR for inten- 
tional ABEND situations. 

• The handling of unexpected errors by dumping, record- 
ing, releasing locks, and attempting to contain the effects 
of the error. 

1 After setting up a recovery FRR, the FRR checks the 
RCAABEND flag for an intentional ABEND situation. 

If one exists, the FRR releases any locks gotten by the RSM 
function, deletes the recovery FRR, indicates "continue 
with termination" and returns control to R/TM. 

2 The FRR verifies the PVT pointer in the GVT. Next, 
the FRR checks the SDWA to see if the error was per- 
colated. If so, the FRR does no recording. If not, the FRR 
sets fields in the SDWA to prepare for recording of the 
error. If the error was a non-percolated X'COD', the 

FRR sets up for retry after calling for a dump. The FRR 
returns control to the point immediately following the 
X'COD' ABEND that called it. 



Module 



Label 



IEAVRCV IEAVRCV 



Extended Description 

3 If the V=R Intercept or Reconfiguration Intercept 

routine (IEAVEQRI or IEAVRCFI) was running, the 
FRR indicates retry at the point addressed by register 14. 

If RSM is providing second-level interruption handling for a 
page-fault program check, the FRR retries at an address 
within IEAVRCV, using RCAPARMI as a guide for process- 
ing: if RCAPARMI is zero, the FRR sets the return code to 
12 in register 15; if it is not zero, the retry routine sets the 
'eturn code to zero to allow any paging I/O in progress to 
complete. Then the retry routine frees the SALLOC lock, 
deletes the RSM FRR and passes control to the Program 
Check Interrupt Handler (IEAVEPC). 

If the Swap-in Root Exit is executing, the FRR abnormally 
terminates the swapped-in address space and attempts retry 
at the address saved from register 14. 

If the Swap-in SRB is executing, the FRR abnormally 
terminates the swapped-in address space and attempts 
to retry at the Dispatcher entry point used for SRB 
exits. 

If the Swap-ln-Post is executing and the RCARETAD 
is non-zero, the FRR releases the SALLOC lock, if 
held, and attempts retry at the address specified in 
RCARETAD. If RCARETAD is zero, the FRR 
performs the same processing described in paragraph 5. 

If IEAVPSI has suffered a program check because of bad 
input parameters, the FRR changes the ABEND code to 
X'17' and indicates "continue with termination". 



Module 



Label 



4 If none of the special situations apply, the FRR 

checks to see if retry will be handled by internal RSM 
routines. If so, and if RCARETAD is non-zero, the FRR 
attempts retry at the address specified in RCARETAD. 
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5 The FRR performs lock clean-up and deletion of its 
own FRR. Then it returns control to R/TM, passing 
a percolate or retry return code previously set. 



Diagram 23-34. RSM Preferred Area Steal (IEAVPREF) (Part 1 of 2) 
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Diagram 23-34. RSM Preferred Area Steal (IEAVPREF) (Part 2 of 2) 
Extended Description Module Label 



The preferred area steal routine runs as a subroutine of 
IEAVGFA or IEAVSQA. Its purpose is to either scan an 
input frame queue to select a preferred area frame to steal 
or convert the status of a storage unit from non-preferred 
to preferred storage. 

J If the call is to steal, the input RBN is the first RBN 

on the frame queue to be searched. Each frame is 
examined until one is found which meets the criteria for 
the steal. 



2 If a suitable frame to be stolen is found, its RBN is 
returned to the caller. Otherwise, sets zero return 

code to indicate that the specified real block number 
could not be found. 

3 If the call is to convert, the input RBN is used to 
identify the physical storage unit to be converted 

from non-preferred to preferred storage. Every PFTE in 
the unit is updated by turning on the PFTPREF flag to 
indicate to RSM that the preferred area has been 
expanded to include these frames. 

4 If message IEA988I has not been issued, it is 
written to the operator, and a flag is set indicating 

that the message has been written. Control returns to 
the caller. 
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Virtual Storage Management 



Virtual storage is the name given to the entire span 
of addresses available on a System/370 system 
with the dynamic address translation feature 
enabled. The size of virtual storage is equal to the 
size of real storage when the system is operating 
with the dynamic address translation feature 
disabled. When the system is in extended control 
mode, with the dynamic address translation feature 
enabled, the size of virtual storage is limited only 
by the addressing capability of the system, not by 
the size of real storage. 

Like other system resources, virtual storage can 
be shared by many system users. Consequently, the 
allocation of virtual storage must be supervised. 
Space must be allocated to a user when it is needed 
and freed when it is no longer needed. The 
supervisor routines that control the allocation and 
release of virtual storage are referred to as VSM 
(virtual storage management) routines. 

The VSM routines service two macro 
instructions: GETMAIN (used to allocate storage) 
and FREEMAIN (used to release previously 
allocated storage). When executed, each macro 
instruction results in an SVC interruption and 
passage of control to the appropriate VSM routines. 

Requests for allocation of virtual storage are 
serviced by the GETMAIN routines. These routines 
service all requests for virtual storage, including 
requests for a new region, space within an existing 
region, space within a system queue area, space 
within a local system queue area. The GETMAIN 
routines create, reference, and continually update 
queues of control blocks to determine whether a 
request for storage can be satisfied, and from 
where the storage is to be allocated. The GETMAIN 
routines pass the address of the allocated area to 
the requesting routine. 

Requests to free virtual storage are serviced by 
FREEMAIN routines. These routines update control 
block queues to relfect the release of previously 
allocated space, thereby making the space available 
for reallocation. The FREEMAIN routines service all 
requests to free virtual storage, including requests 
to free an entire region, space within a region, 
space within a local system queue area, and space 
within the system queue area. 

The VSM routines assign blocks of storage to the 
various tasks according to their needs. The VSM 
routines: 

• Allocate virtual storage blocks on request. 

• Release virtual storage blocks on request. 



Ensure that real (fixed by definition) 
page-frames exist for all SQA, LSQA, and 
nonpageable (V=R) region space allocated. 
Maintain storage usage information for use by 
System Management Facilities. 
Protect storage with fetch protection and 
storage protection keys. 



The GETMAIN and FREEMAIN routines are 
supported by the getpart and freepart 
routines, which allocate and free regions and their 
associated control block space. 

The GETPART and FREEPART routines are called 
by GETMAIN and FREEMAIN to allocate and free 
space for an entire virtual region. These routines 
can process requests for both pageable (v=v) and 
nonpageable (V=R) regions. For V=R region 
requests, VSM passes control to Real Storage 
Management to allocate real storage frames to 
match the virtual pages allocated for the V=R 
region. 

VSM also comprises a set of routines which 
handle intialization and termination of VSM 
resources within an address space. 

The Create/Free Address Space routines are 
called by Address Space Create and Address Space 
Termination to allocate and initialize or delete 
address space control block space for a new 
address space. The Create Address Space routine 
calls Real Storage Management to initialize the 
RSM control blocks for the new address space. A 
subroutine within the Create/Free Address Space 
routines performs storage clean-up when a task 
terminates. It frees all local storage being used by 
the terminating task. 

Another set of routines satisfy requests for quick 
cells, small fixed-length blocks of storage in the 
SQA or in the LSQAs that can be allocated quickly 
and that can be expected to be used repeatedly 
during short periods of time. 

The Build Quick Cell Pool routine establishes a 
set of quick cells within an area of storage 
specified by the requester, a system routine. It 
formats the storage into a "best fit" number of 
quick cells or extends an established pool by 
formatting the new space and enqueuing it from 
the old pool space. 
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The GETCELL routine allocates a quick cell from Sllbpools 

an established cell pool. The FREECELL routine ' , . <.,.„,, 

- • i 11 * * *l. u A subpool is a group of logically related storage 

frees a quick cell for further use by returning it to , , , • , . P . 7 , , , , ™ 

4 , , f u- u •* ii * j blocks identified by a subpool number. The 

the pool from which it was allocated. , , .... , , . , ,. 

t-u r> i * r\ • i ry n r» 1 ..• j 1 . n subpool number indicates to vsm the kind of 

The Delete Quick Cell Pool routine deletes all or * , _ 

. , , e . , ,, v , e tU storage that is requested. Figure 2-44 summarizes 

part of a pool of quick cells, either freeing the , , , . 

iU * v f j u 4L the subpool assignments, 

storage or enqueuing the storage to be freed by the K & 

user. 

Another routine allows the protection key for 

one or more areas of virtual storage to be 

manipulated. Both the storage protection key and 

the fetch protection key for a page that has been 

allocated by GETMAIN can be changed by using 

the change key routine (CHANGKEY). 
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Subpool 








Number 


Indicates Request for 


Attributes of Subpool 


Notes 


0-127 


Space within a region 


Job-oriented 


These are the only valid subpool numbers for problem 






Pageable 


programs. A request for a higher number will cause the 






Job step's protection key 


problem program to be abnormally terminated. When 






Fetch-protected 


subpool is requested by programs in supervisor state 
and key 0, subpool 252 is assigned. 


128 






Reserved for compatibility with VSI. Treated as an error. 


129-226 






Undefined. 


227 


Fixed global space 


User protection key 


Multiple-key system queue area. Space is obtained 




(explicitly assigned 


Fixed 


from the Common Service Area (CSA). 




and freed) 


System-oriented 

Explicitly assigned and freed 

Fetch-protected 




228 


Fixed global space 


User protection key 


Multiple-key system queue area. Space is obtained 




(explicitly assigned 


Fixed 


from the Common Service Area (CSA). 




and freed) 


System-oriented 

Explicitly assigned and freed 

Not fetch-protected 




229 


Private Area Storage 


User protection key 


Automatically freed at task termination. Assigned from 






Pageable 


top of private area. 






Fetch-protected 




230 


Private Area Storage 


User protection key 


Freed automatically at task termination. Assigned from 






Pageable 


top of private area. 






Not fetch-protected 




231 


Space within CSA 


User protection key 


Assigned in Common Service Area. 




(explicitly assigned 


Pageable 






and freed) 


Fetch-protected 
System-oriented 
Explicitly assigned and 
freed 




232 






Reserved. Treated as an error. Used in OS/VS2 Release 1 
for TSO external page storage. 


233 


Space within LSQA 


Job-oriented 


Allows a task running in key to acquire accountable. 




(task-related) 


Fixed 


fixed, protected storage that is job-oriented and freed 






Protection key = 


at end of task. Space is assigned from subpool 253. 






Task-related 








Swappable 








Not fetch-protected 




234 


Space within LSQA 


Job-oriented 


Allows a task running in key to acquire accountable. 




(job-step-related) 


Fixed 


fixed, protected storage that is job-oriented and freed 






Protection key = 


at end of job step. Space is assigned from subpool 254. 






Job-step-related 








Swappable 








Not fetch-protected 




235 


Space within LSQA 


Job-oriented 


Allows a task running in key to acquire n on -accountable, 




(explicitly assigned 


Fixed 


fixed, protected storage that is job-oriented. Space is 




and freed) 


Protection key = 
Explicitly assigned and 

freed 
Not fetch-protected 


assigned from subpool 255. 






Swappable 
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Subpool 
Number 


Indicates Request for 


Attributes of Subpool 


Notes 


236 


Space within SWA 


For system use only 
Protection key = 1 
Not fetch-protected 


To assign or free pageable virtual storage for the 
scheduler work area. 


237 


Space within SWA 


For system use only 
Protection key = 1 
Not fetch-protected 


To assign or free pageable virtual storage for the 
scheduler work area. 


238 






Reserved for compatibility with OS/VS1 . 
Treated as an error. 


239 


Fixed, Global Space 
(explicitly assigned 
and freed) 


Fetch-protected 
Protection key = 
Explicitly assigned and 
freed 


System queue area space obtained from the Common 
Service Area (CSA). Treated as subpool 227 
key-zero space. 


240 


Space within a region 
(job-step-related) 


Job-oriented 

Pageable 

Job step's protection key 

Fetch-protected 

Job-step-related 


Treated as subpool 250 to maintain compatibility with 
MFT and OS/VSI. Automatically freed at end of step. 


241 


Space within CSA 


System-oriented 

Pageable 

User protection key 

Explicitly assigned and 

freed 
Not fetch-protected 


Assigned in the Common Service Area. 


242 


Nonpageable 
V = R region 


For scheduler use only 


A new nonpageable (V = R) region is assigned or an 
existing nonpageable region is freed. 


243 






Reserved. Treated as an error. Used in 0S/VS2 Release 1 
for SQA space. 


244 






Reserved. Treated as an error. Used in OS/VS2 Release 1 
for SQA space. 


245 


Space within SQA 
(explicitly assigned and 
freed) 


System-oriented 

Fixed 

Protection key = 

Explicitly assigned and 

freed 
Not fetch-protected 


Allows a task running in key to acquire non-accountable, 
fixed, protected storage that is system-oriented. 


246 






Reserved. Treated as an error. Used in MVT to exchange 
regions. 


247 


Pageable (V = V) region 


For scheduler use only 


A new pageable (V = V) region is assigned or an existing 
pageable region is freed. External page storage allocation 
is assumed when using this subpool. 


248 






Reserved. Treated as an error. Used in MVT for rollout/ 
rollin. 


249 






Reserved. Treated as an error. Used in OS/VS2 Release 1 
for LSQA segments. 


250 


Space within a region 


Job-oriented 

Pageable 

Job step's protection key 

Job-step-related 

Fetch-protected 


Allows a task running in supervisor state 
and key state to acquire unprotected storage in the 
user's region. All subpool 250 requests are assigned 
subpool of the associated task. 
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Subpool 
Number 


Indicates Request for 


Attributes of Subpool 


Notes 




0-127 


Space within a region 


Job-oriented 

Pageable 

Job step's protection key 

Fetch-protected 


These are the only valid subpool numbers for problem 
programs. A request for a higher number will cause the 
problem program to be abnormally terminated. When 
subpool is requested by programs in supervisor state 
and key 0, subpool 252 is assigned. 




128 






Reserved for compatibility with VSI. Treated as an error. 




129-226 






Undefined. 




227 


Fixed global space 
(explicitly assigned 
and freed) 


User protection key 

Fixed 

System-oriented 

Explicitly assigned and freed 

Fetch-protected 


Multiple-key system queue area. Space is obtained 
from the Common Service Area (CSA). 




228 


Fixed global space 
(explicitly assigned 
and freed) 


User protection key 

Fixed 

System-oriented 

Explicitly assigned and freed 

Not fetch-protected 


Multiple-key system queue area. Space is obtained 
from the Common Service Area (CSA). 




229 


Private Area Storage 


User protection key 

Pageable 

Fetch-protected 


Automatically freed at task termination. Assigned from 
top of private area. 




230 


Private Area Storage 


User protection key 

Pageable 

Not fetch-protected 


Freed automatically at task termination. Assigned from 
top of private area. 




231 


Space within CSA 
(explicitly assigned 
and freed) 


User protection key 
Pageable 
Fetch-protected 
System-oriented 
Explicitly assigned and 
freed 


Assigned in Common Service Area. 




232 






Reserved. Treated as an error. Used in OS/VS2 Release 1 
for TSO external page storage. 




233 


Space within LSQA 
(task-related) 


Job-oriented 

Fixed 

Protection key = 

Task- related 

Swappable 

Not fetch-protected 


Allows a task running in key to acquire accountable, 
fixed, protected storage that is job-oriented and freed 
at end of task. Space is assigned from subpool 253. 




234 


Space within LSQA 
(job-step-related) 


Job-oriented 

Fixed 

Protection key = 

Job-step-related 

Swappable 

Not fetch-protected 


Allows a task running in key to acquire accountable, 
fixed, protected storage that is job-oriented and freed 
at end of job step. Space is assigned from subpool 254. 




235 


Space within LSQA 
(explicitly assigned 
and freed) 


Job-oriented 

Fixed 

Protection key = 

Explicitly assigned and 

freed 
Not fetch-protected 
Swappable 


Allows a task running in key to acquire non-accountable, 
fixed, protected storage that is job-oriented. Space is 
assigned from subpool 255. 





J* 



Figure 2-44. Subpool Assignments (Part 1 of 3) 



Section 2: Method of Operation 5-89 



SbBB^! 



Subpool 
Number 


Indicates Request for 


Attributes of Subpool 


Notes 


236 


Space within SWA 


For system use only 
Protection key = 1 
Not fetch-protected 


To assign or free pageable virtual storage for the 
scheduler work area. 


237 


Space within SWA 


For system use only 
Protection key = 1 
Not fetch-protected 


To assign or free pageable virtual storage for the 
scheduler work area. 


238 






Reserved for compatibility with OS/VS1 . 
Treated as an error. 


239 


Fixed, Global Space 
(explicitly assigned 
and freed) 


Fetch-protected 
Protection key = 
Explicitly assigned and 
freed 


System queue area space obtained from the Common 
Service Area (CSA). Treated as subpool 227 
key-zero space. 


240 


Space within a region 
(job-step-related) 


Job-oriented 

Pageable 

Job step's protection key 

Fetch-protected 

Job-step-related 


Treated as subpool 250 to maintain compatibility with 
MFT and OS/VSI. Automatically freed at end of step. 


241 


Space within CSA 


System-oriented 

Pageable 

User protection key 

Explicitly assigned and 

freed 
Not fetch-protected 


Assigned in the Common Service Area. 


242 


Nonpageable 
V = R region 


For scheduler use only 


A new nonpageable (V ■ R) region is assigned or an 
existing nonpageable region is freed. 


243 






Reserved. Treated as an error. Used in OS/VS2 Release 1 
for SQA space. 


244 






Reserved. Treated as an error. Used in OS/VS2 Release 1 
for SQA space. 


245 


Space within SQA 
(explicitly assigned and 
freed) 


System-oriented 

Fixed 

Protection key = 

Explicitly assigned and 

freed 
Not fetch-protected 


Allows a task running in key to acquire non-accountable, 
fixed, protected storage that is system-oriented. 


246 






Reserved. Treated as an error. Used in MVT to exchange 
regions. 


247 


Pageable (V = V) region 


For scheduler use only 


A new pageable (V = V) region is assigned or an existing 
pageable region is freed. External page storage allocation 
is assumed when using this subpool. 


248 






Reserved. Treated as an error. Used in MVT for rollout/ 
rollin. 


249 






Reserved. Treated as an error. Used in OS/VS2 Release 1 
for LSQA segments. 


250 


Space within a region 


Job-oriented 

Pageable 

Job step's protection key 

Job-step-related 

Fetch-protected 


Allows a task running in supervisor state 
and key state to acquire unprotected storage in the 
user's region. All subpool 250 requests are assigned 
subpool of the associated task. 
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Subpool 
Number 


Indicates Request for 


Attributes of Subpool 


Notes 


251 


Space within a region 


Job-oriented 

Job step's protection key 

Job-step-related 

Fetch-protected 


Allows an authorized task to acquire accountable, 
unprotected, pageable storage in the user's partition. 
Space is job-oriented and automatically freed at the 
termination of the job step. Used for modules not loaded 
into Subpool 252 from the low end of storage. 


252 


Space within a region 


Job-oriented 
Protection key = 
Job-step-related 
Not fetch-protected 


Allows a task running in key to acquire accountable, 
pageable, protected storage in the user's region that is 
job-oriented and automatically freed at the termination 
of the job-step task. Used for reenterable modules from 
authorized libraries. 


253 


Space within LSQA 
(task-related) 


Job-oriented 

Fixed 

Protection key = 

Task-related 

Not fetch-protected 

Swappable 


Allows a task running in key to acquire fixed, 
accountable, protected storage in the LSQA for the user's 
region that is job-oriented and freed when the task 
terminates. 


254 


Space within LSQA 
(job-step related) 


Job-oriented 

Fixed 

Protection key = 

Job-step-related 

Swappable 

Not fetch-protected 


Allows a task running in key to acquire fixed, 
accountable, protected storage in the LSQA for the user's 
region that is job-oriented and freed when the job step 
terminates. 


255 


Space within LSQA 
(explicitly assigned and 
freed) 


Job-oriented 

Fixed 

Protection key = 

Explicitly assigned and 

freed 
Swappable 
Not fetch-protected 


Allows a task running in key to acquire fixed, non- 
accountable, protected storage in the LSQA that is job- 
oriented and must be explicitly freed. 
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Diagram 24-1. GETMAIN Routine (IEAVGMOO) (Part 1 of 2) 
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Input 



From SVC First Level Interrupt 
Handler (IEAVEEXT) or a 
supervisor routine 



via branch entry 



Process 




Output 



1 Set up internal parameters 
for processing request. 



2 Check the subpool number and 
initialize pointers to it. 

For subpools 242 or 247, pass 
control to GETPART for special 
processing. 



3 Satisfy the request as 
specified. 



4 Return. 



$ 




To EXIT Prolog 
(IEAVEEXP) 



Reg1 


Contents at 
entry 


Reg 10 


Length 


Reg 11 


Address 


Reg 4 


LDA Addr 


Reg 5 


Error Code 



Reg 10 



Ptrto 
Length List 



Reg 11 



List of 
Addresses 



LDA 



LDARQSTA 



SPQE 



SPQEPTR 
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Reg 15 



£ 



Return Code 
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Diagram 24-1. GETMAIN Routine (IEAVGMOO) (Part 2 of 2) 

Extended Description Module Label 

The GETMAIN routine (IEAVGMOO) allocates virtual stor- 
age in the SQA and CSA and in the LSQA, SWA, and user 
region of each virtual memory. It also provides storage-used 
figures for System Management Facilities use. 



1 For entry points IGC004 and IGC005, GETMAIN 
checks the validity of all input parameters and lists. 

For all other entry points, no validity checking occurs. 
GETMAIN then sets up internal parameters describing 
the operation to be performed and the information 
needed to perform it. 

2 GETMAIN checks the subpool number in the parameter 
list. If subpools 242 or 247 are requested, GETMAIN 

passes control to GETPART (IEAVPRTO). For other sub- 
pools, GETMAIN checks the validity of the subpool request 
and the authorization of the user. If the subpool request is 
invalid, GETMAIN abnormally terminates the user with a 
code of Bxy, where xy is the hexadecimal SVC under which 
GETMAIN was called. For authorized subpool requests, 
GETMAIN obtains pointers to the relevant control blocks, 
such as the TCB, GDA (Global Data Area), and the SPQE 
(Subpool Queue Element). 



IEAVGMOO GMBASE 
IEAVEVAL IEAOVLOO 
IEAVEVAL IEA0VL01 



IEAVGMOO CSPCHK 



IEAVPRTO IEAVPRTO 



Extended Description Module 

3 GETMAIN creates an SPQE if no SPQE exists. Then it 
searches for virtual storage to satisfy the request. If 

the requested space is not available, GETMAIN sets register 
15 to 4 or 8 for conditional requests. For unconditional 
requests, GETMAIN abnormally terminates the task. If 
the space is available, GETMAIN updates the FQE to show 
the allocated storage and notifies SMF and SRM how much 
has been allocated. 

4 GETMAIN returns control to the caller with a return 
code of for a successful allocation or an error return 

code of 4 or 8 if the request is conditional; GETMAIN 
schedules an abnormal termination if the request is 
unconditional. 

Error Processing 

When an error occurs in GETMAIN, Recovery Termination 
passes control to the FRR. The FRR records information 
on SYS1 .LOGREC, calls for an SVC DUMP, and tries to 
repair the subpool queues. Then for unexpected errors 
(machine check, program check, etc), the FRR percolates 
the error for higher level recovery to RTM. For SALLOC 
lock release or page release failures, the FRR returns control 
for execution to continue. For other errors, the FRR issues 
a completion code of 7xy (where xy is the SVC number under 
which GETMAIN was called) and then percolates the error 
through RTM. 



Label 

IEAVGMOO GSPQESPC 
IEAVGMOO GETMAINB 
IEAVGMOO GRRECORE 



IEAVGMOO GFQEUPDT 

IEAVGMOO SRMSTART 

IEAVGMOO GMSMFCRE 

IEAVGMOO GERROR 



IEAVGFRR IEAVGFRR 
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Diagram 24-2. FREEMAIN Routine (IEAVGMOO) (Part 1 of 2) 



Input 



From SVC First Level Interrupt 
Handler (IEAVEEXT) or a 
supervisor routine 
via branch entry 



Reg 1 



Parameter 
List 



Process 



Reg 14 



Return Address 



£ 



1 Set up internal parameters 
for processing request. 



2 Check the subpool specified 
and initialize pointers to it. 
For subpools 242 or 247, 
pass control to FREEPART 
for special processing. 



3 Satisfy the request. 



£ 



-K 4 Return. 




Output 
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Diagram 24-2. FREEMAIN Routine (IEAVGMOO) (Part 2 of 2) 

Extended Description Module 

The FREEMAIN routine (IEAVGMOO) frees virtual storage 
in the SQA and CSA and in the LSQA, SWA, and user 
region of each virtual address space. 



1 For an SVC 5 request, FREEMAIN checks the input 
parameters and parameter lists. For all other entries, 

FREEMAIN only indicates the type of entry. The 
FREEMAIN sets up registers with internal parameters to 
allow common routines to process FREEMAIN requests. 

2 FREEMAIN checks the subpool requested. For 
subpools 242 and 247, FREEMAIN passes control to 

FREEPART to free the storage. For subpools not in LSQA 
or SQA, FREEMAIN searches for an SPQE. If no SPQE is 
found, FREEMAIN sets an error return code of 4 if the 
request is conditional. 

3 FREEMAIN rounds the request up to an 8-byte multi- 
ple and searches for the requested storage. It removes 

the appropriate storage from the allocated space and updates 
the FQE to show freed space. The AQEs (Allocated Queue 
Element) for the freed space are removed. FREEMAIN 
determines whether one or more complete pages of virtual 
storage have been freed. If so, FREEMAIN calls the RSM 
PGRLSE routine to release the real pages. Then FREEMAIN 
releases the virtual pages and updates the FBQE (Free Block 
Queue Element) associated with the type of storage released. 
FREEMAIN also notifies the SRM how much space is avail- 
able in CSA or SQA. In addition, for 4K block releases, 
FREEMAIN updates the storage-used fields in the TCT for 
SMF use. 



Label 



IEAVGMOO GMBASE 



IEAVGMOO FMCOMMON 



IEAVPRT0 IEAVPRTO 



IEAVGMOO FMCOM 



IEAVRELS IEAVRELV 



Extended Description 

4 FREEMAIN returns to the caller with a code of in 

register 15 for a successful operation; failures are 
indicated with codes of 4 or 8 in register 15 if the request 
is conditional. For an unconditional FREEMAIN or a 
parameter error on a conditional FREEMAIN, FREEMAIN 
calls for an abnormal termination of the user task, 
of the user task. 

Error Processing 

When an error occurs in a FREEMAIN operation. Recovery 
Termination passes control to the FRR (functional recovery 
routine). The FRR records information on SYS1.LOGREC, 
calls for an SVC DUMP operation if necessary, and tries to 
repair the subpool queues. For unexpected errors, such as 
machine checks, the FRR returns control to RTM for 
higher-level error recovery. For SALLOC lock release or 
page release failures, the FRR returns control and allows 
execution to continue. For other errors, the FRR issues a 
completion code of 7xy (where xy is the SVC number 
through which FREEMAIN was entered) and then passes 
the error back to RTM for further recovery. 
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Diagram 24-3. GETP ART Routine (IEAVPRTO) (Parti of 2) 
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Diagram 24-3. GETP ART Routine (IE AVPRTO) (Part 2 of 2) 

Extended Description Module 

The GETPART routine (IEAVPRTO) allocates region space 
at the request of the system. Both V=V and V=R requests 
are processed by GETPART. 



1 GETPART calls IEALIMIT, the user exit routine, to 
determine if an installation-supplied limit is to be 

applied to the region request. 

2 GETPART checks the V=V region size requested 
against the total space available for regions within 

the address space. If not enough space is available, 
GETPART puts a return code of 8 in register 15 and 
returns. If not enough contiguous space is available, 
GETPART puts a return code of 20 in register 15. A 
region size of zero is taken by GETPART as a request 
for the system default region size. 

3 For a V=R request, GETPART finds an FBQE (Free 
Block Queue Element) to satisfy the request and then 

calls RSM to allocate the corresponding real pages. If RSM 
returns a code of 8, indicating it found assigned frames 
already allocated in the area requested by GETPART, 
GETPART recalls RSM with the next available free address. 
If GETPART can't find sufficient space, it puts a return 
code of 20 in register 15. If RSM passes a return code of 
16, GETPART puts a return code of 16 in register 1 5. 



Label 



IEAVPRTO IEALIMIT 



IEAVPRTO IEAVPRTO 



IEAVPRTO IEAVPRTO 



IEAVEQR IEAVEQR 



IEAVPRTO IEAVPRTO 



Extended Description 

4 GETPART enqueues a VRWPQEL on the global 
queue of waiting requests. This occurs when GETPART 

cannot initially find virtual space to satisfy the V=R region 
request. When the space becomes free, GETPART posts 
the ECB for the request. The initiator then reissues the 
GETPART request. 

5 When the required region has been allocated, 
GETPART returns a code of in register 15. 

Error Processing 

When an error occurs in GETPART processing. Recovery 
Termination passes control to the GETPART Functional 
Recovery routine (FRR). For machine checks and program 
checks in GETPART, the FRR retries the GETPART routine 
(for V=V requests) or retries the specific section where failure 
occurred (V=R requests). Where no retry can be made, the 
FRR cleans up storage already allotted and queues processed 
and calls for termination to continue. In all cases, the FRR 
initializes the SDWA. Then the FRR returns to R/TM. 

If an error in the XMPOST routine occurs during the wait- 
ing period, the FRR abnormally terminates the waiting 
initiator with a code of X'304'. 
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Diagram 244. FREEPART Routine (IEAVPRTO) (Part 1 of 2) 
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Diagram 24-4. FREEPART Routine (IEAVPRTO) (Part 2 of 2) 
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Extended Description 

The FREEPART routine (IEAVPRTO) processes requests 
from initiators and Started Task Control to return virtual 
or real region space to available space. The routine also 
dequeues and frees the control blocks defining the region. 

1 FREEPART checks the WAIT queue and the POST 
queue for requests relating to the region being released. 

If found, the elements are dequeued and the space freed. 

2 FREEPART releases any remaining allocated space 
within the region and the SPQEs identifying it. Then 

the space representing the region is returned to the system 
queues. For a V=R region, FREEPART also releases the 
DPQE and PQE for the region. 

3 For a V=R region, FREEPART calls RSM to release 
the real pages and their identifying control blocks. 

If the return code from RSM is not zero, FREEPART puts 
a return code of 4 in register 15. 



Module 



Label 



IEAVPRTO IEAVPRTO 



IEAVPRTO IEAVPRTO 
IEAVGMOO RMBRANCH 
IEAVGMOO MRELEASE 



IEAVEQR IEAVEQRF 



Extended Description 

4 FREEPART checks the VRWAITQ for requests that 
can be satisfied by the region space just freed if the 

FREEPART was for a V=R region. It posts requests that 
can use up to, but not more than, the available space. 

5 When processing is completed, FREEPART returns 
to the caller. If the FREEPART is successful, a return 

code of is placed in register 15. 



Module 



Label 



IEAVPRTO IEAVPRTO 



IEAVPRTO IEAVPRTO 



IEAVGPRR IEAVGPRR 



Error Processing 

When Recovery Termination passes an error to IEAVGPRR, 
the routine looks for program checks and machine checks. 
For these errors, IEAVGPRR tests to determine the extent 
of processing and calls for retry at that point. For other 
errors, termination is indicated. IEAVGPRR sets up the 
SDWA and returns to Recovery Termination. For errors in 
posting routines from the WAIT queue, IEAVGPRR abnor- 
mally terminates the Initiator for the address space with a codelEAVGPRR PRTOERTN 
of X'304\ 
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V Diagram 24-5. Create Address Space (IEAVGCAS) (Part 1 of 2) 
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Diagram 24-5. Create Address Space (IEAVGCAS) (Part 2 of 2) 

Extended Description Module Label 

IEAVGCAS (VSM Address Space Creation) processes 
requests to set up a new address space. It initializes the 
address space control blocks and calls RSM to set up the 
RSM control blocks. 



1 IEAVGCAS checks the caller's authorization. If the 
caller is not authorized, IEAVGCAS puts a return 

code of 4 in register 15. 

2 IEAVGCAS gets a page of storage in the Master 
Scheduler address space. If the storage can't be 

obtained, IEAVGCAS puts a return code of 4 in register 15. 

3 IEAVGCAS calls RSM Address Space Initialization 

to set up global and local address control blocks in the 
new address space. If RSM returns a non-zero return code, 
IEAVGCAS frees the page in the Master Scheduler address 
space and puts a return code of 4 in register 1 5. 



IEAVGCAS IEAVGCAS 



Extended Description 

4 IEAVGCAS builds the LDA (Local Data Area) in the 
top of the page obtained from the Master Scheduler 

address space. Then it initializes the various address space 
and region control blocks used by VSM: PQE, FBQE, 
SPQE.DQE.andFQE. 

5 IEAVGCAS releases the virtual page in the Master 
Scheduler address space. 



IEAVGCAS IEAVGCAS Q IEAVGCAS returns to the caller through register 14. 



IEAVITAS IEAVITAS 



Error Processing 

When errors occur, IEAVCARR frees the page in Master 
Scheduler address space. For program checks and machine 
checks, IEAVCARR retries the IEAVGCAS routine unless 
RSM had been entered; if so, IEAVCARR returns to 
Address Space Creation with a return code of 4. For any 
other errors, IEAVCARR records information in the SDWA 
and routes control to R/TM to continue termination 
processing. 



Module Label 

IEAVGCAS IEAVGCAS 



IEAVGCAS IEAVGCAS 

IEAVGCAS IEAVGCAS 
IEAVCARR IEAVCARR 
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Diagram 24-6. Free Address Space (IEAVGFAS) (Part 1 of 2) 
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Diagram 24-6. Free Address Space (IEAVGFAS) (Part 2 of 2) 

Extended Description Module 

IEAVGFAS (VSM Address Space Freeing) processes the 
deletion of an address space. It dequeues and frees all queue 
elements relating to the address space and updates the sys- 
tem control blocks. 



1 IEAVGFAS checks the caller's address space against 
the Master Scheduler ASID. If not equal, the routine 

puts a return code of 4 in register 15. 

2 IEAVGFAS checks the VRWAITQ and VRPOSTQ 
for an element identified for the specified address 

space, dequeues it, and frees the space. 

3 If no errors have occurred, IEAVGFAS puts a return 
code of in register 1 5 and returns. 

Error Processing 

For retriable errors during dequeuing, IEAVFARR attempts 
to retry the dequeuing routine; for other retriable errors, 
IEAVFARR re-enters the IEAVGFAS routine. For other 
errors, IEAVFARR records information in the SDWA and 
returns to Recovery Termination. 
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IEAVGCAS IEAVGFAS 

IEAVGCAS IEAVGFAS 
IEAVGCAS FREEQEL 
IEAVGCAS IEAVGFAS 
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Diagram 24-7. Task Termination (IEAVGCAS) (Part 1 of 2) 
Input 
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Diagram 24-7. Task Termination (IEAVGCAS) (Part 2 of 2) 
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Extended Description 

IEAQSPET (VSM Task Termination) performs storage 
clean-up operations when a task is terminating. It frees all 
local storage owned by the task. 

1 IEAQSPET frees the subpool storage represented by 

the SPQEs chained from the TCBMSS field for the 
task unless the subpool is shared. Then it frees the SPQEs. 



Module 



Label 



IEAVGCAS IEAQSPET 
IEAVGCAS FREESPQE 



IEAQSPET frees the subpool 229 and 230 storage 
and the SPQEs for the task. 



IEAVGCAS IEAQSPET 
IEAVGCAS FREESPQE 



IEAQSPET frees the SWA space for the task unless the IEAVGCAS IEAQSPET 
subpool is shared and then frees the SPQEs. IEAVGCAS FREESPQE 



4 When all control block queues have checked, 

IEAQSPET returns to EXIT with a return code of 
in register 15. If any of the FREEMAIN operations failed, 
IEAQSPET places a return code of 4 in register 15. 

Error Processing 

When the error is a program check or a machine check, 
IEAVTTRR enters the IEAQSPET routine for retry. Other- 
wise, it returns to Recovery Termination after recording the 
SDWA information. 
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IEAVCARR IEAVTTRR 
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Diagram 24-8. Build Qukkcen Pool Routine (IEAVBLDP) (Part 1 of 2) 
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Diagram 24-8. Build Quickcell Pool Routine (IEAVBLDP) (Part 2 of 2) 

Extended Description Module Label 

The Build Quickcell Pool routine (IEAVBLDP) creates, 
extends, or reformats a pool of quickcells, as directed 
by the internal macro instruction (BLDCPOOL) that 
invokes it. Modules that can require a new quickcell 
pool are: IEAVEMIN, IEAVESVC. IEAVMDOM, 
IEAVMWTO, IEAVNIPO, IEAVNPA6. IEAVNP14, 
IEAVPCB, IEAVSWCH. IEAVVINT, IEAVVRP2, 
IEAVVWTO. IEEMB803. IEEMB804, and IRARMSRV. 
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1 IEAVBLDP checks the CPAB (Cell Pool Anchor Block) 
and CPID (Cell Pool Identifier) passed to it. It deter- 
mines whether a new cellpool must be created, whether a 
cell pool is to be extended, or whether a cell pool is to be 
reformatted. 

2 IEAVBLDP verifies that all parameters passed are 
valid by checking them against the skeleton CPAB 

built by the macro processor. 

3 IEAVBLDP formats the new cell pool by dividing 

it into the number of cells that will fit into the specified 
area and storing pointer and size information in the CPAB. 
Then it formats each cell, linking it to its chain through 
linkage pointers. 

4 IEAVBLDP returns control to the caller with a return 
code indicating success (0) or an error: 

Return 
Code 
8 
12 
16 
20 



IEAVBLDP IEAVBLDP 



IEAVBLDP CPIDTEST 



IEAVBLDP POOLFORM 



LOOPFORM 



IEAVBLDP ERREXIT 



Error 

Invalid CPID or unformatted pool. 

Invalid Subpool 

Invalid cell size 

Incompatible concurrent request. 



In each error return case, register contains the extent 
subpool number and the extent length; register 1 contains 
the extent address. 



Diagram 24-9. GETCELL Routine (IEAVGTCL) (Parti of 2) 
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Diagram 24-9. GETCELL Routine (IE AVGTCL) (Part 2 of 2) 

Extended Description Module Label 

The GETCELL routine (IEAVGTCL) allocates a quick- 
cell from an established quickcell pool. The routine is 
invoked through the GETCELL internal macro instruction. 
Modules that can require quickcell allocation are: 
IEAVELK, IEAVEMIN, IEAVEPC, IEAVEQR, IEAVESVC, 
IEAVGPRR, IEAVMDOM, IEAVMWTO, IEAVPCB, 
IEAVPFTE, IEAVPIOP, IEAVRCF, IEAVRFR, IEAVSOUT, 
IEAVSWCH, IEAVTRTH, IEAVTRTM, IEAVTRTR, 
IEAVVRP2, IEAVVWTO, IEEMB804, and IRARMSRV. 

1 I EA VGTCL checks the CP ID and CPAB passed for IEAVGTCL IEAVGTCL 
validity. It also checks for matching CPIDs and empty 

pools. 

2 IEAVGTCL locates an empty cell in the requested IEAVGTCL PERMCPID 
pool by checking the CPABFACP field. It also verifies 

that no deletions are in process against the extent. 

3 IEAVGTCL checks the cell for residence in the proper IEAVGTCL DEQLOOP2 
extent and for boundary alignment within the extent. 

4 IEAVGTCL stores the CPID in the chosen cell and IEAVGTCL STORCPID 
unlocks the pool extent for further operations. 

5 IEAVGTCL returns control to the caller with a return 
code of for successful allocation or the following 

error return codes: 
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Code Error 
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£ Diagram 24-10. FREECELL Routine (IEAVFRCL) (Part 1 of 2) 
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Diagram 24-10. FREECELL Routine (IEAVFRCL) (Part 2 of 2) 

Extended Description Module Label 

The FREECELL routine (IEAVFRCL) returns a quick- 
cell to a quickcell pool, it makes the cell available for use 
by adding it to a queue of available calls in the pool. 
Modules that may no longer require an allocated 
quickcell are: IEAVDLAS, IEAVEDSO, IEAVEEXP, 
IEAVEOR, IEAVEPCR, lEAVEQR, lEAVGFA. 
IEAVGPRR, IEAVIOCP, IEAVMDOM, IEAVMDSV, 
IEAVPIOI. IEAVRCF, IEAVRFR. IEAVSOUT. 
IEAVSWCH, IEAVSWIN. IEAVTRTR. IEAVTRT1. 
IEAVTRT2. IEAVVRP2, IEAVVWTO, IEEMB803, 
and IRARMSRV. 



1 IEAVFRCL checks the cell to determine that it was 
allocated from the cell pool specified. 

2 IEAVFRCL locates the CPAB for the cell pool 
specified. 

3 IEAVFRCL verifies that the cell is on an integral 
boundary in the extent, and that no deletions are 

taking place concurrently. 

4 IEAVFRCL returns the cell to the pool of available 
cells and releases the extent for further operations. 



IEAVFRCL PERMCPID 



IEAVFRCL GOTCPAB 



IEAVFRCL CPABLOOP 



IEAVFRCL ENQLOOP 



IEAVFRCL returns control to the user and passes a 
return code indicating success (0) or an error return 
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Diagram 24-1 1 . Delete QiuckceD Pool (IEAVDELP) (Part 1 of 2) 
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Diagram 24-1 1 . Delete Quickcell Pool (IEAVDELP) (Part 2 of 2) 

Extended Description Module Label 

The Delete Quickcell Pool routine (IEAVDELP) removes all 
or part of a pool of quickcells, either freeing the storage or 
enqueuing the storage for user freeing. Either one extent, 
all extents, or the whole pool may be deleted, depending on 
which DELCPOOL macro instruction option is chosen. 



1 IEAVDELP checks the CPID against the CPAB for 
validity. It also checks to see if NIP created the cell 

pool. 

2 IEAVDELP finds the last extent and checks for 
another operation in progress. If none, IEAVDELP 

dequeues the CPAB for the last extent. 

3 If the suppress FREEMAIN option was chosen, 
IEAVDELP stores FREEMAIN information in the 

first two words of the extent. Otherwise, IEAVDELP frees 
the storage used by the extent and its CPAB. 



IEAVDELP GOTCPAB 



IEAVDELP EXTENT 



IEAVDELP REMOVEAB 



Extended Description 

4 IEAVDELP checks for pool deletion and, if requested, 
loops through the pool deleting all extents and 

CPABs. 

5 IEAVDELP sets to zero all fields in the permanent 
CPAB, except CPABCPID, when the entire pool of 

quickcells has been deleted. 

5 IEAVDELP returns control to the caller with a return 
code of zero for success or one of the following error 
return codes: 



Module 



Label 



IEAVDELP REMOVED 



IEAVDELP DELEXIT 



Return 
Code 
8 

12 

16 

20 



Error 

Attempt to delete a N IP-created pool. 

Attempt to delete an unformatted pool. 

Invalid or null CPID. 

A conflicting function is pending for specified 

extent. 



Diagram 24-12. Change Key Routine (DEAVCKEY) (Part 1 of 2) 
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Diagram 24-12. Change Key Routine (IEAVCKEY) (Part 2 of 2) 



Extended Description 

The change key routine (IEAVCKEY) changes the key of 
areas of storage within the problem program subpools at 
the request of supervisor-state key programs. 

1 Two types of interfaces are recognized, R-type and 
L-type. R-type interfaces (indicated by bit zero of 

input register being zero) specify via general purpose 
registers 1 and 2 a single virtual address (VA). L-type 
interfaces (indicated by bit zero of input register 
being one) specify one or more VA ranges via a 
parameter list. 

2 For L-type interfaces, the parameter list supplied 
must be in fixed storage (L/SQA or PGFIX). For 

either interface, the VA range(s) must define storage 
from subpools 0-127, 251, and 252. 

3 For each VA range, the storage key and fetch 
protection flag at all pages in the range are changed 

to the new key and new fetch protect flag supplied. 
This is accomplished by: 

• Changing the XPTPROT field in the XPTE associated 
with each page. 

• Changing the hardware key of any pages that are 
assigned to a frame in real storage at the time of the 
request. 

Xhe key of the first page that will be changed is saved for 
return to the caller upon successful completion of the 
change key function. 



Module 



Label 



IEAVCKEY IEAVCKEY 



IEAVCKEY REGPTOC 
LISTPROC 
ELTVCK 
PAGEVCK 

IEAVCKEY ELTPROC 
KEYCHG 



Extended Description 

4 If a page within this area is found not to have 
been allocated (via GETMAIN) during the process 

of changing the key for the area of storage, an error 
condition is recognized and the original key of the area 
of storage is restored. 

5 At the successful completion of this routine, the 
caller receives control with a return code of in 

register 15 and the key of the first page changed in 
register 0. 

Error Processing: 

For any error that prevents successful completion of the 
change key function, the requesting program is abnormally 
terminated with an error code in register 15 reflecting the 
exact error that occurred. 

For unexpected errors in IEAVCKEY, recovery termination 
management (RTM) gives control to the change key FRR 
(IEAVCKRR). For system or machine errors, the FRR 
records information on SYS1.LOGREC and requests, when 
possible, a retry to recover the original storage key of all 
areas of storage that has been changed. For all other type 
error conditions, percolation is requested through RTM. 



Module 



Label 



IEAVCKEY ELTPROC 
RECOVER 



IEAVCKEY IEAVCKEY 



IEAVCKRR IEAVCKRR 
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Auxiliary Storage Management (ASM) 

Overview 

ASM transfers virtual storage pages between real 
storage and auxiliary storage, either as a paging 
operation (a page at a time) or as a swapping 
operation (an address space at a time). 
Additionally, ASM manages auxiliary storage, and 
maintains the necessary copies of VIO data set 
pages. 

ASM is called by RSM (Real Storage 
Management) and VBP (Virtual Block Processor). 
ASM interfaces more directly with RSM than before; 
RSM calls the appropriate modules in ASM for the 
specific function needed. Also, control blocks 
(XPTEs and AlAs) are shared with RSM. VBP calls 
one module (ilrgos) to initiate VIO operations. 

The ASM MO diagrams are presented in seven 
sections corresponding to the seven functions 
described here. There is an introduction to each 
section that contains a more complete description 
of each function, including control block usage. 

ASM processing is divided into seven functions: 

• I/O Control is the communication link 
through which Real Storage Management 
(RSM) makes paging and swapping requests. 
I/O Control determines the type of request, 
passes it to the Swap Driver part of I/O 
Control or to the I/O Subsystem, and is 
notified of its completion. I/O Control notifies 
RSM of the completion, and keeps track of 
the auxiliary storage locations of all virtual 
pages. 

• I/O Subsystem receives control via an SRB 
from I/O Control, starts I/O Supervisor (IOS) 



processing by issuing the STARTIO macro, and 
returns control to I/O Control after the 
completion of the I/O. The message module, 
which produces the messages issued by ASM, 
is also a part of the I/O Subsystem. 
VIO Control coordinates and synchronizes 
all ASM processing required to support vio 
data sets. This function interfaces with the 
Virtual Block Processor (VBP) for 
group-related requests. VIO Control and I/O 
Control process VIO page-related requests 
that RSM initiates. 

VIO Group Operators maintain the VIO data 
set information required by VBP. These 
operators are invoked only by vio Control as 
the result of requests from vbp. 
Recovery provides the mechanism to handle 
two types of errors, those detected during 
normal ASM processing, and those detected 
by ASM recovery while it is in control. ASM 
recovery attempts to determine the severity of 
the error and then takes appropriate action. 
Service Routines include: an ASM control 
block formatting facility, which is invoked by 
the system dump-printing facility; an address 
space termination resource manager, whose 
main function is to reclaim auxiliary storage 
resources from an address space that is 
terminating; and a pool extender routine for 
adding storage to a virtual storage pool. 
Page Expansion gives the user the ability to 
add page and swap data sets to the system 
without having to do another IPL. This 
function is available to the installation 
through the pageadd operator command. 
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I/O Control 

In MVS, RSM initiates all paging and swapping I/O. 
The I/O Subsystem (part of ASM) and the I/O 
Supervisor (IOS) execute the paging/swapping I/O. 
I/O Control is the communication link between 
RSM and the I/O Subsystem-lOS. 

I/O Control is divided into three functional 
units: Initial Page Processing, Initial Swap 
Processing, and Completion Processing. 

Initial Page Processing 

The ASM module ILRPAGIQ performs Initial Page 
Processing. RSM or Initial Swap Processing sends a 
chain of asm I/O Request Areas (AlAs) to 
ILRPAGIO. Each AIA represents a request for a 
paging operation (either in or out) against either 
vio or non-vio pages. 

MO Requests 

ILRPAGIO sends requests for VIO paging to ILRPOS 
(the Page Operation Starter, part of VIO Control) 
for processing. See Chapter 3, "VIO Control " for 
a description. The return of an AIA address from 
ILRPOS to ILRPAGIO indicates an error AIA. 

Non-VIO Requests 

For non-vio write requests, ILRPAGIO clears the 
XPTE (External Page Table Entry) of the page to 
be written and calls ilrfrsli (an entry point in 
the Free Slot module, also part of I/O Control) to 
free the slot of auxiliary storage that page currently 
occupies. 

For non-vio read requests, the XPTE is checked 
to see if the page to be read has a valid LSID 
(Logical Slot Identifier). If the LSID is valid, it is 
copied into the AIA. If it is invalid, or if there was 
a previous I/O error on this page (indicated by a 
flag in the xpte), the AIA is in error. 

ILRPAGIO puts valid AlAs on the staging queue 
(ASMSTAGQ). The ILRQIOE entry point of 
ILRPAGIO is then called to build an IOE (I/O 
Request Element) for each AIA on the queue. 
Initial Page Processing and the I/O Subsystem 
communicate via lOEs. 

ILRQIOE queues write lOEs to the PART (Page 
Activity Reference Table); it queues read IOEs to 
the PART Entry of the page to be read. If there is 
no I/O currently outstanding, ILRQIOE then 
schedules an SRB for ILRPTM (the PART Monitor, 
part of the I/O Subsystem) to start the work 
represented by the IOEs. If there is I/O currently 
outstanding, Page Completion (ILRPAGCM) will 



schedule the SRB for ilrptm when that I/O 
completes. 

Each AIA received from RSM is processed until 
the entire chain of AlAs is exhausted or an error is 
found. If an error is found, the AIA chain is broken 
and the error AIA and any following AlAs are 
returned to RSM. 

Initial Swap Processing 

Two modules, ilrswap and ilrswpdr, perform 
initial swap processing. RSM sends a chain of AlAs 
to ilrswap. ILRSWAP divides the chain into two 
groups: requests against non-LSQA pages and 
requests against LSQA pages. Non-LSQA requests 
are sent to ILRPAGIO to be processed to page data 
sets. 

When ILRPAGIO returns, ilrswap determines if 
the ILRSLSQA entry point of ilrswap can be 
called to process the LSQA pages through special, 
high-speed, swap data sets. If all paging operations 
are complete, ilrswap calls ilrslsqa. If all 
paging operations are not complete, the LSQA 
pages cannot be processed now and ILRWSAP 
returns to RSM. LSQA page processing is initiated 
later by ILRPAGCM, the page completion routine. 

When ILRSLSQA gets control, if the AIA request 
is a swap-out and no swap data sets are available, 
or if it is a swap-in of LSQA pages previously 
written to page data sets, ilrslsqa calls ILRPAGIO 
to process the AIA. Otherwise, ILRSLSQA builds a 
sccw (Swap Channel Command Workarea) and a 
channel program for the request, and chains the 
SCCW from the SART Entry (Swap Activity 
Reference Table Entry) for the appropriate swap 
data set. An SRB for ilrswpdr (the Swap Driver) 
is scheduled to start the work represented by the 
sccw. 

ilrswpdr checks each sart Entry for work 
(represented by a sccw chained from the SART 
Entry). When it finds work, it locks the sart entry 
and chains the SCCW to the iorb/iosb (I/O 
Request Block and I/O Supervisor Block) that is 
also chained to the SARTE. ilrswpdr then issues 
STARTio to begin IOS processing against the swap 
data set. 

Completion Processing 

ILRPAGCM handles completion processing. The 
function of ILRPAGCM is to process completed 
page and swap requests and place the AlAs on 
queues to be retried or to be returned to RSM. 
ILRPAGCM divides the chain of AlAs that is passed 
to it into two groups; one group contains AlAs 
representing paging requests, the other contains 
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swapping requests. It processes each group 
separately. 

Page Completion 

This procedure handles all AlAs that are completed 
for page requests and vio requests. When an aia 
completes successfully, Page Completion puts it on 
a queue to be returned to RSM. If an error occurs 
on a read request and if there is a backup copy of 
the page, the request is retried. An error on a write 
request is always retried. If any additional I/O 
requests are queued to the PART, ILRPAGCM 
schedules an srb for ilrptm. If a swap-out is in 
process, Page Completion checks to see if all 
non-LSQA operations have completed. If they have, 
ILRSLSQA is called to start the LSQA swap. 

Swap Completion 

The swap completion routine handles all 
completions for LSQA pages regardless of whether 
they were processed through swap data sets or 
through page data sets. Swap Completion processes 
AIAs in the order in which they are received. AIAs 
that are grouped for swap data sets are rechained 
prior to being returned to RSM. 



Completed swap-in AIAs are returned to RSM 
immediately unless the I/O retry flag (indicating 
IOS failure) is set in the aia. In this case, the 
requests are retried by queueing the AIAs to the 
sarwaitq or the ASMSTAGQ, depending on 
whether a swap data set or a page data set is being 
used. 

Swap Completion queues normal swap-out 
completions to the Swap Capture Queue 
(ashcapq). Swap-out completions that fail are 
retried by sending them to the SARWAITQ (for 
swap data sets) or the ASMSTAGQ (for page data 
sets). If there was an error and no more swap data 
sets are available, the AIA is sent to the capture 
queue and the captured error flag is set. When all 
AIAs for a particular address space have been 
placed on ASHCAPQ, Swap Completion determines 
if any AIAs have error flags set. If no errors 
occurred Swap Completion returns the entire group 
of AIAs to RSM. Otherwise, Swap Completion puts 
the entire group on the ashswpaq to be retried by 

ILRSLSQA. 
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25.1 



I/O Control 
(ILRPAGIO) 



25.1.1 



Queue I/O 

Request 

(ILRQIOE) 



I/O Control 



25.2 



Swap Control 
(ILRSWAP) 



25.2.1 



Swap LSQA 
(ILRSLSQA) 



25.4 



Page and Swap 

Completion 

(ILRPAGCM) 



25.3 



Swap Driver 
(ILRSWPDR) 



25.5 



Free Slot for 

RSM 

(ILRFRSLT) 



25.5 



Free Slot for 

ASM 

(ILRFRSL1) 



25.5 



Free Swap Set 
(ILRFRSW1) 



25.x. - Module 

25.x.y. — Entry point in module 25.x. 

Figure 2-57. I/O Control Overview 
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R 1 


AIA 


1 
R 2 




i 


*SMHD 


1 H' 








ASMHD 







FROM RSM 
ROUTINES OR 
ILRSWAP 



J 



:=S 



AIAWRITE=1 



/ 
Output 



ILRPAGIO: 
| 01 | SAVE REGISTERS (ASMWKSA1), 

| 02 | ESTABLISH RECOVERY. 



h 



WRITES, SEND ENTIRE CHAIN - 
TO ILRPOS TO PROCESS. IF 
ANY AIA T S RETURNED, SEND 
THEM BACK TO CALLER. GO TO 
STEP 8. 



<Z> 



ILRPOS 



ASM ROUTINE 





R 4 






r 
*• 






VTA 








ATAAIA 




AIA 




■ 















CALLED BY RSM FOR A PAGING 
OPERATION, OR FROM ILRSWAP FOR 
PAGING THE NON-LSQA PAGES ON A 
SWAP OPERATION. REGISTERS ARE 
SAVED IN THE ASMVT SAVE AREA 
DEFINED FOR THIS MODULES USE. 



SETFRR IS ISSUED FOR RECOVERY 
PURPOSES. ILRIOFRR RECOVERY 
ROUTINE HANDLES ERRORS OCCURRING 
IN ILRPAGIO. 



FOR VIO REQUESTED WRITES 
(AIAVIO=1 AND AIAWRITE=1) THE 
ENTIRE CHAIN OF AIA T S IS SENT TO 
THE VIO PAGE OPERATIONS STARTER 
SINCE THESE TYPES OF REQUESTS 
CANNOT BE MIXED WITH ANY OTHER 
TYPE. ILRPOS DETERMINES IF THE 
PAGES MAY BE STARTED IMMEDIATELY 
AND HOLDS THEM OR QUEUES THEM TO 
THE STAGING QUEUE SS 
APPROPRIATE. IF ANY ERRORS ARE 
DETECTED, THE AIA AND ANY 
SUCCEEDING AIA'S ARE RETURNED TO 
THIS MODULE, AND THEY WILL BE 
RETURNED TO THE CALLER AT EXIT. 
GO TO STEP8. 



Diagram 25.1 ILRPAGIO (Part 1 of 4) 
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AIAVIO0 
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PCB ^ XPTE | 




|PCBXPTA | J 












XPTVALID=1 


















» 


PCB XPTE | 




JPCBXPTA | J 






XPTVALID-0 



















Output 



| 04 | FOR NORMAL WRITE REQUESTS: 



IF XPTE IS VALID AND 
NOT A VIO PAGE. FREE 
ANY CURRENTLY ASSIGNED 
SLOTS . 



£F^ 



CO 



ASM ROUTINE 



SET PAGE-OUT-IN-PROCESS- 
FLAG AND QUEUE AIA TO - 
STAGING QUEUE. GO TO 
STEP 7. 



li=0 















R 1=LSID 




ASMVT 


XPTE 












ASMSTAGF 


XPTPOINP 


ASMSTAGL 












VIA 








VIA 



















FOR NORMAL WRITE REQUESTS 
(AIAWRITE=1 AND AIAVIO=0) : 



A. IF THE XPTE IS VALID (A 
PREVIOUS WRITE HAS BEEN DONE 
FOR THIS PAGE) AND IS NOT A 
VIO DEFINED PAGE 

(XPTVALID= T r) THE SLOT THAT 
IS CURRENTLY ASSIGNED TO THE 
PAGE IS FREED BY ILRFRSL1, 
BECAUSE SOME OTHER SLOT WILL 
BE USED FOR THE WRITE. 

B. MARK XPTE BEING A 'PAGE OUT 
IN PROGRESS T PAGE 
1XPTP0INP= T 1'} AND PUT AIA ON 
THE STAGING QUEUE (ASMSTAGQ) . 
GO TO STEP 7 TO CHECK FOR 
MORE AIA T S TO PROCESS. 



Diagram 25.1 ILRPAGIO (Part 2 of 4) 
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PCBXPTA XPTE I 




1 H' 




\ 






XPTVIOLP=1 














PCB __ XPTE | 




| PCBXPTA |J 




1 


> 


J 


XPTVALID=0 - 




XPTIOERR=1 














V 






PCB XPTE 




| PCBXPTA | J 






XPTVALID=1 - 








XPTLSID 



















Output 



FOR A READ REQUEST WITH 
THE VIO FLAG SET. SEND THE- 
AIA TO POS. IF THE AIA IS 
RETURNED. SEND IT BACK TO 
THE CALLER. GO TO STEP 7. 



CO 



ASM ROUTINE 



06 FOR REGULAR READ REQUESTS: 



IF THE PAGE IS NOT 
VALID OR HAD A PREVIOUS- 
READ ERROR, SET THE 
APPROPRIATE FLAGS IN 
THE AIA AND RETURN THE 
AIA TO THE CALLER. GO 
TO STEP 8. 

IF THE PAGE IS VALID 
PUT LSID INTO AIA AND - 

8UEUE AIA TO STAGING 
UEUE. 



lU 



R 4 


ATA 


1 H 






AIA 


ATAAIA 




1 


I 













ASMVT AIA 






r 






ASMWKAS1 


AIABADID=1 






AIA 














AIAPRIER=1 















ASMVT 


AIA 






r*" 




ASMSTAGF 


AIALSID 


ASMSTAGL 

















FOR READ REQUESTS THAT HAVE VIO 
PAGES IN THE SLOT, THE AIA MUST 
BE SENT TO ILRPOS TO BE 
PROCESSED AS IN THE ABOVE STEPS. 
HOWEVER, IN THIS CASE EACH AIA 
FOR A VIO PAGE (XPTVIOLP= ' 1 * ) 
MUST BE SENT INDIVIDUALLY SINCE 
THEY MAY BE MIXED WITH OTHER 
TYPES OF REQUESTS. IF THE AIA IS 
RETURNED BY ILRPOS SOME TYPE OF 
ERROR WAS DETECTED AND THE AIA 
AND ANY SUCCEEDING AIA'S WILL BE 
RETURNED TO THE CALLER AT EXIT. 
GO TO STEP 7 TO CHECK FOR MORE 
AIA'S TO PROCESS. 



I 06 I FOR REGULAR READ REQUESTS 
1 ■ (XPTWRITE=0 AND XPTVIOLP=0) 



A. CHECK TO SEE IF THE PAGE 
SUFFERED A PREVIOUS READ 
ERROR AT SWAP IN TIME 
(XPTIOERR=1) OR IF IT IS NOT 
VALID (XPTVALID=0) . IF EITHER 
CONDITION IS DETECTED SET THE 
CORRESPONDING ERROR FLAG IN 
THE AIA (AIAPRIER OR 
AIABADID) AND RETURN THE AIA 
AND ANY SUCCEEDING AIA'S TO 
THE CALLER AT EXIT. GO TO 
STEP 8 TO CHECK FOR WORK ON 
THE STAGING QUEUE. 



B. IF THE XPTE IS VALID 

(XPTVALID= ' 1 ' ) THE LSID 
(LOGICAL SLOT IDENTIFIER) 
MUST BE COPIED FROM THE XPTE 
TO THE AIA. THE AIA IS THEN 
PLACED ON THE STAGING QUEUE. 



Diagram 25.1 ILRPAGIO (Part 3 of 4) 
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Processing 



07 IF ANY MORE AIA'S ON 
CHAIN, GO TO STEP 4. 



08 IF ANY AIA'S ARE ON THE 
STAGING QUEUE. CALL 
ILRQIOE TO PROCESS THEM. 



Output 



CD 



ILRQIOE 



ASM ROUTINE 



09 DELETE THE FRR. 






ASMVT AIA 






J 'l 1 


ASMSTAGF 




ASMSTAGL 











IF ANY MORE AIA'S REMAIN TO BE 
PROCESSED (AIANXAIA NOT= 0) , GO 
TO STEP 4. 



IF ANY AIA'S WERE PUT ON THE 
STAGING QUEUE, EITHER BY 
ILRPAGIO ITSELF OR BY ILRPOS, 
CALL ILRQIOE TO START THE 
PROCESSING. 



REMOVE RECOVERY. 
RETURN TO CALLER. 



ILRQIOE 



Diagram 25.1 ILRPAGIO (Part 4 of 4) 
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Input 



processing 



Output 



FROM ILRPAGIO 
AND OTHER ASM 
ROUTINES 







ILRQIOE: 
|01 I SET FOOTPRINT IN THE ATA. 



02 SAVE REGISTERS (ASMWKSA2) 

1 ' AND ZERO WORKAREA 

ESTABLISH ADDRESSABILITY. 



GET THE FIRST AIA ADDRESS 
AND DETERMINE IF THERE IS 
ONE TO PROCESS. IF NONE TO 
PROCESS, GO TO STEP 12. 



GET AN IOE AND PREPARE TO 
PROCESS THE AIA. IF NO 



ATA 










ASMVT 










ASMWKSA2 











ILRQIOE IS ENTERED FROM 
ILRESTRT, ILRPAGIO, ILRSWAP, AND 
ILRPAGCM WITH REGISTER 3 
POINTING TO THE ASMVT, REGISTER 
4 POINTING TO THE ATA AND AIA'S 
TO BE PROCESSED CHAINED FROM THE 
STAGING QUEUE (ASMSTAGQ). IOE T S 
WILL BE BUILT FOR THE AIA'S 
ACCORDING TO THE INDICATORS IN 
THEM. AN INDICATOR IS SET IN ATA 
FOR RECOVERY PURPOSES. ILRCQIOE 
(AN ENTRY IN ILRIOFRR RECOVERY 
ROUTINE) HANDLES ERRORS 
OCCURRING IN ILRQIOE. 



THE CHAIN OF AIA'S TO PROCESS IS 
QUEUED TO THE DOUBLE HEADED 
ASMSTAGQ. THE FIRST AIA 
(ASMSTAGF) IS PICKED UP AND IF 
NON-ZERO IT IS PROCESSED. IF 
THERE ARE NO AIA'S GO TO STEP 
12. 



ISSUE THE ILRGMA MACRO TO GET AN 
IOE. THE IOE'S ARE TAKEN FROM A 
NON-EXPANDABLE POOL CONTROLLED 
IN THE ASMVT. THE IOE WILL BE 
RETURNED VIA REGISTER 1, BUT IF 
IT IS ZERO THERE ARE NO IOE T S 
AVAILABLE AND PROCESSING 
CONTINUES AT STEP 10. 



Diagram 25.1.1 ILRQIOE (Part 1 of 4) 
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AIADUPLX=1 




















> 












AIAPRIER=1 








AIASECER=1 








AIA 


















AIAPRIER=0 




AIASECER=0 

















Processing 



Output 



1 05 1 FOR A DUPLEXING REQUEST: 



A. IF THERE IS A PRIOR 
ERROR, INITIALIZE THE - 
IOE. 

B. IF THERE ARE TWO PRIOR - 
ERRORS OR NO ERRORS. 
TWO IOE T S MUST BE BUILT 
AND INITIALIZED. IF THE 
SECOND IOE WAS NOT 
AVAILABLE FREE THE 
FIRST ONE AND GO TO 
STEP 1 1 . 



IOE 


AIA 


IOEAIA 


r* 


AIAPRIER=0 


IOELSIDA 


AIALSID 









r 



AIASECER=0 



IOE 


IOE 




IOEAIA q 




IOEAIA 


IOELSIDA 


IOELSIDA 










AIA 




AIAPRIER=0 


AIASECER=0 


AIALSID=0 











IF THIS IS A DUPLEXING REQUEST A 
CHECK IS MADE TO SEE IF THERE 
WERE ANY ERRORS. THE ERROR BITS 
INDICATE THAT AN ATTEMPT WAS 
MADE PREVIOUSLY BUT AN I/O ERROR 
OCCURRED AND IT MUST BE RETRIED. 



IF ONLY ONE OF THE ERROR BITS 
(AIAPRIER OR AIASECER) ARE ON 
THEN ONLY THAT ONE HAS TO BE 
RETRIED. A PRIMARY ERROR 
(AIAPRIER) INDICATES AN ERROR 
GOING TO THE PLPA OR COMMON 
DATA SET WHILE A SECONDARY 
ERROR INDICATES AN ERROR 
GOING TO THE DUPLEX DATA SET. 
ONLY ONE IOE WILL BE BUILT 
FOR THE ONE RETRY. 



IF BOTH ERROR BITS ARE ON OR 
IF NEITHER BIT IS ON THE 
REQUESTS MUST BE WRITTEN TO 
BOTH DATA SETS. ANOTHER IOE 
IS OBTAINED AND THEN BOTH ARE 
BUILT. IF A SECOND IOE IS NOT 
AVAILABLE THE FIRST IS GIVEN 
BACK AND PROCESSING CONTINUES 
AT STEP 1 1 . 



THE IOE'S FROM STEP 5 ARE PUT ON 
LOCAL QUEUES AND A LOCAL FLAG 
(WRITEFLGl IS TURNED ON TO 
INDICATE THAT WRITE IOE'S MUST 
BE PUT ON THE PART HEADER 
QUEUES. GO TO STEP 9. 



Diagram 25.1.1 ILRQIOE (Part 2 of 4) 
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AIADUPLX=0 














AIAWRITE=0 
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j — • 










AIALSID 

















07 IF THIS IS A WRITE AIA, 
1 1 INITIALIZE THE IOE AND 

8UEUE IT TO A TEMPORARY 
UEUE. GO TO STEP 9. 



08 IF THIS IS A READ AIA. 

1 ' INITIALIZE THE IOE AND 

DETERMINE IF PART ENTRY 
INDEX (NN VALUE OF LSID) 
IS VALID. 

A. IF IT IS VALID, PUT THE- 
IOE ON READ QUEUE. 



m 



IF THE PART ENTRY IS 
NOT VALID PUT AIA ON 
PART ERROR QUEUE AND 
SET A FLAG IN THE AIA. 



ERROR AND QUEUE IT TO 
THE PART ERROR QUEUE. 



ASMVT IOE 






r 




ASMWKSA 


f 




AIA 





















PART ENTRY AIA 








1 1 


PAREIOEQ 






IOE 




IOEAIA 















J ' 




PARTAIAE 


AIABADID=1 







IF THIS IOE IS FOR A WRITE 
REQUESTS (AIAWRITE=1) INITIALIZE 
THE IOE AND QUEUE IT FOR THE 
LOCAL DATA SET. TURN ON THE 
LOCAL FLAG (WRITEFLG) AND GO TO 
STEP 9. 



IF THIS IS A READ REQUEST 
(AIAWRITE=0) CHECK THAT THE PAGE 
DATA SET (PART ENTRY) INDICATED 
EXISTS. THE SECOND BYTE (NN 
PORTION) OF LSID IS AN INDEX TO 
THE PART ENTRY. 



IF THE INDEX ENTRY IS WITHIN 
THE RANGE OF PART ENTRIES IN 
USE (PARTEUSE). IT IS VALID. 
THE IOE IS INITIALIZED AND 
PUT ON THE PART ENTRY READ 
QUEUE (PAREIOEQ) . THE IORBS 
CHAINED FROM THE PART ENTRY 
ARE CHECKED TO DETERMINE THAT 
ONE IS AVAILABLE (IORFUSE=0). 
IF ONE IS. A LOCAL FLAG 
(READFLAG) IS SET TO INDICATE 
TO SCHEDULE PART MONITOR. 



ENTRY IS INVALID. THE IOE IS 
RETURNED, THE AIA IS PUT ON 
THE PART ERROR QUEUE, AND 
AIABADID IS .SET TO 1 . 



C. IF THE DATA SET THESE 
REQUESTS ARE BEING MADE 
AGAINST IS NOT USABLE 

(PARENUSE=1) , AIABADID IS SET 
TO 1 AND THE AIA IS QUEUED TO 
THE PART ERROR QUEUE 

(PARTAIAE) . 



Diagram 25.1.1 ILRQIOE (Part 3 of 4) 
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X-rtI\A 






ASMCALLQ 








ASMSRBCT 


PARTAIAE 


















I 


.OCAL FLAGS 








READFLAG 




WRITEFLAG 















09 GET THE NEXT AIA POINTER. 

I 1 IF THERE IS AN AIA GO TO 

STEP 4. 



IF ANY IOE'S WERE BUILT IN- 
STEPS 6 S 7, GET THE ASM - 
CLASS LOCK, QUEUE THE 
IOE T S TO THE PART WRITE 
QUEUES, AND RELEASE THE 
LOCK. 



ED 



IF THERE IS WORK FOR PART 
MONITOR, AN SRB IS BUILT 
AND INITIALIZED, THEN 
SCHEDULED. 



12 RESTORE REGISTERS, RESET 

I 1 FOOTPRINT IN THE ATA AND 

RETURN TO CALLER. 



L, 



RETURN TO 
CALLER (SEE 
STEP!) 





PART 












PARTCOMQ 


PARTDUPQ 


PARTLOCQ 




' 


[OE 








[OE 
















SRB 























GET THE NEXT AIA FROM THE QUEUE 
1ASMSTAGF) . IF THERE IS AN AIA . 
TO PROCESS GO TO STEP4. IF THERE 
IS NO AIA SET THE LAST POINTER 
(ASMSTAGL) TO ZERO. 



AT THIS POINT ALL AIA'S HAVE 
BEEN PROCESSED OR THERE ARE NO 
IOE'S. THE INTERNAL FLAG 
(WRITEFLG) IS CHECKED TO SEE IF 
ANY WRITE IOE'S WERE PUT ON THE 
LOCAL QUEUES. IF WRITEFLG=0 
THERE ARE NONE SO GO TO STEP 12. 
THE IOE'S ARE PUT ON THE WRITE 
QUEUES IN THE PART HEADER 
TPARTLOCQ, PARTCOMQ PARTDUPQ) . 



THE PART MONITOR (ILRPTM) IS 
SCHEDULED IF THERE IS NO I/O 



AIAS WERE PUT ON THE PART ERROR 
QUEUE TPARTAIAE), OR IF THE 
LOCAL FLAGS (READFLAG OR 
WRITEFLAG) ARE ON. HOWEVER, IF 
THE SRB FOR PART MONITOR IS 
ALREADY SCHEDULED (ASMSRBCT-i»0) 
IT WILL NOT BE SCHEDULED AGAIN. 
ALSO IF COMPLETION TlLRPAGCM) IS 
THE CALLER ( ASMCALLQ- 1) THE SRB 
WILL NOT BE SCHEDULED, BECAUSE 
COMPLETION SCHEDULES IT. 



LJU 



RESTORE REGISTERS FROM ASMWKSA2, 
RESET THE FOOTPRINT IN THE ATA 
AND RETURN TO THE CALLER. 



Diagram 25. 1. 1 ILRQIOE (Part 4 of 4) 
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ASMHD 


I 












ASHSWPOT=0 


ASHSWP0T=1 






ASHIOCNT=0 















Output 



ILRSWAP: 

|0l| ENTRY IS FROM IEAVPIOI 
(SWAP-OUT REQUESTS) OR 
IEAVSWIN (SWAP- IN 
REQUESTS) . 

| 02 | QUEUE AIA'S TO SWAP QUEUE, - 
AND PASS NON-LSQA AIA'S TO* 
THE PAGE I/O CONTROLLER. 



C=> 



ASM ROUTINE 



1 03 1 IF AIA'S ARE RETURNED BY 
THE PAGE I/O CONTROLLER, 
RETURN THEM AND ALL AIA'S 
ON THE SWAP QUEUE TO THE 
CALLER. GO TO STEP 5. 

| 04 | FOR ALL SWAPINS OR FOR 
SWAPOUT AND NO I/O 
OUTSTANDING, CALL LSQA 
PROCESSOR. 



C3 



ILRSLSQA 



ASM ROUTINE 



05 DELETE FRR. 



1U 



AIA(LSQA) 





J 'l 1 


ASHSWAPQ 






AIA (NON-LSQA 
) 



| 1 | ILRSWAP INITIALIZES THE SWAP 
REQUESTS RECEIVED FROM RSM. 
ESTABLISHES ADDRESSABILITY, 
SAVES CALLER'S REGISTERS IN THE 
ASMVT, AND ISSUES SETFRR TO 
ESTABLISH A RECOVERY 
ENVIRONMENT. ILRCSWAP (ENTRY IN 
ILRSWP01 RECOVERY ROUTINE) 
HANDLES ERRORS OCCURRING IN 
ILRSWAP. 

1 02 1 THE INPUT AIA'S ARE QUEUED TO 
THE ASM HEADER SWAP QUEUE 
(ASHSWAPQ). THOSE AIA'S THAT 
REPRESENT NON-LSQA PAGES ARE 
DEQUEUED AND SENT TO ILRPAGIO, 
THE PAGE I/O CONTROLLER, TO BE 
PROCESSED. NON-LSQA PAGES ARE 
WRITTEN TO PAGE DATA SETS, NOT 
SWAP DATA SETS. 

| 03 | ANY AIA'S RETURNED BY ILRPAGIO 
MUST BE SENT BACK TO THE CALLER 
ALONG WITH ANY OTHER AIA'S ON 
THE SWAP QUEUE. THE AIA'S 
RETURNED REPRESENT AN ERROR AIA 
AND THE SUBSEQUENTLY CHAINED 
AIA'S. SET A RETURN CODE OF 4 
AND GO TO STEP 5. 



Notes 



|pa | IF THERE WERE NO NON-LSQA AIA'S 
TO BE PROCESSED FOR A SWAP OUT 
REQUEST AND NO I/O WAS 
OUTSTANDING AT THE TIME THE 
REQUEST WAS MADE, OR IF THE 
REQUEST WAS FOR A SWAPIN, CALL 
ILRSLSQA TO PROCESS THE LSQA 
PAGES BEING SWAPPED. IF THERE IS 
OUTSTANDING I/O, ILRPAGCM WILL 
CALL ILRSLSQA WHEN I/O 
COMPLETES. 



DELETE THE FRR AND RESTORE 
CALLER'S REGISTERS. 



ILRSLSQA 



Diagram 25.2 ILRSWAP (Part 1 of 1) 
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fc> 



AIAPAGDS-1 



AIAPAGDS-0 



SARSCCWQ 



ILRSLSQA: 



02 



ENTERED WITH SALLOC HELD 
AND FRR SET. SET TRACKING 
INFORMATION IN ATA AND 
INITIALIZE WORKAREA. 



IF REDRIVE IS REQUESTED, 
GOTO STEP 5, IF NOT. 
PROCESS AIA's ON THE 
ASHSWAPQ. 



\oT\ SWAPIN REQUESTS (READS) : 



A. IF PAGES WERE WRITTEN 



TO PAGE DATA SET, PUT 
AIA 1 S ON ASMSTAGQ ~~~ 



!r> 



CALL ILRQIOE. 



CO 



ILRQIOE 



ASM ROUTINE 



IF PAGES WERE WRITTEN - 
TO A SWAP DATA SET, PUT- 
AIA'S IN GROUPS. OBTAIN 
A FREE SCCW AND BUILD 
CHANNEL PROGRAM. PUT 
SCCW ON PROPER SART 
ENTRY FOR SWAP DRIVER. 
IF NO SCCWS ARE FREE, 
PUT AIA T S ON SARWAITQ. 



L 



ATA 










ATASLSQA 




ASMVT 










ASMWKSA5 











ASMVT AIA 






J "l 1 


ASMSTAGQ 















SART SCCW 






SARWAITQ 


J'l 1 


SARTE 






AIA 




' 















[o7| 



ILRSLSQA PROCESSES THE LSQA 
PAGES OF A SWAP PROCESS. ENTERED 
WITH SALLOC HELD AND FRR 
PREVIOUSLY SET. SET TRACKING 
INFORMATION IN THE ATA FOR 
RECOVERY AND CLEAR THE WORKAREA 
IN THE ASMVT. ILRCSLSQ (ENTRY IN 
ILRSWP01 RECOVERY ROUTINE) 
HANDLES ERRORS OCCURRING IN 
ILRSLSQA. 



02 IF R2-0. ENTRY WAS MADE FOR 

1 ' PROCESSING WORK THAT WAS 

PREVIOUSLY LEFT ON THE SARWAITQ 

?ECAUSE OF A LACK OF RESOURCES 
SCCW T S). GOTO STEP 5. IF R2-i=0, 
T CONTAINS AN RSMHD POINTER. 
ENTRY WAS MADE TO PROCESS AIA'S 
FOR THAT ADDRESS SPACE, AND THE 
AIA'S ARE ON THE ASHSWAPQ. 



IF PAGES WERE WRITTEN TO A PAGE 
DATA SET AT SWAPOUT TIME 
(AIAPAGDS-1) . THE AIA T S ARE 
PLACED ON. THE ASMSTAGQ AND 
ILRQIOE IS CALLED TO PROCESS 
THEM. IF THE PAGES WERE WRITTEN 
TO A SWAP DATA SET A SCCW IS 
OBTAINED AND CHANNEL PROGRAMS 
BUILT. THE SCCW IS THEN PLACED 
ON THE PROPER SART ENTRY FOR THE 
SWAP DRIVER. IF NO SCCW T S ARE 
FREE, THE AIA T S ARE PUT ON THE 
SARWAITQ. 



ILRQIOE 



Ref 



Label 
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Input 



AIAWRITE=1 



Processing 



04 SWAPOUT REQUESTS (WRITES): 



Output 



SARSETCT>0 



AIAWRITE=1 



SARSETCT=0 



SARWAITQ 



INTO GROUPS AND SET THE 
SWAP COUNT. ALLOCATE 
SWAPSETS, AND BUILD THE 
CHANNEL PROGRAM. PUT 
SCCW ON PROPER SART 
ENTRY FOR SWAP DRIVER. 

IF NO SWAP SETS ARE 
AVAILABLE, QUEUE AIA'S - 
TO ASMSTAGQ7 CALL 
ILRQIOE TO PROCESS THE 
AIA ¥ S . 



-c=$ 



<T> 



ILRQIOE 



ASM ROUTINE 



IF ANY WORK IS ON THE 
SARWAITQ, REMOVE AIA GROUP 
AND GOTO STEP 3. 



iU 



SART SCCW 






J 'l I 


SARTE 













ASMVT AIA 






J 'l I 


ASMSTAGQ 













FOR SWAP OUT REQUESTS, IF SWAP 
SETS ARE AVAILABLE THE AIA T S ARE 
DIVIDED INTO GROUPS AND SWAP 
SETS ARE ALLOCATED. THE CHANNEL 
PROGRAM IS BUILT AND THE SCCW 
PUT ON THE PROPER SART ENTRY FOR 
THE SWAP DRIVER. IF NO SWAP SETS 
ARE AVAILABLE, THE AIA'S ARE 
PLACED ON THE ASMSTAGQ AND 
ILRQIOE IS CALLED TO PROCESS 
THEM. 



IF ANY WORK WAS LEFT BEHIND 
PREVIOUSLY (CAUSED BY AN SCCW 
SHORTAGE), REMOVE A GROUP FROM 
THE SARWAITQ AND GOTO STEP 3. 



ILRQIOE 



Ref 



Label 
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IF ANY WORK WAS PUT ON THE- 
SARTE'S AND THE SWAP 
DRIVER IS NOT SCHEDULED, 
SCHEDULE AN SRB. 



07 RETURN TO CALLER. 



IF ANY WORK WAS PUT ON A SART 
ENTRY, AND THE SWAP DRIVER IS 
NOT CURRENTLY SCHEDULED 
(SARSRBCT=0) , SCHEDULE AN SRB 
AND SET THE SCHEDULED COUNT 
(SARSRBCT=1) TO PREVENT ANOTHER 
CPU FROM SCHEDULING. 



07 RETURN TO CALLER. 
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Output 




ILRSWPDR: 

[pT] ENTERED IN SRB MODE FROM 
DISPATCHER. SETFRR, AND 
RESET SRB SCHEDULED COUNT 
(SARSRBCT) . 

[02] OBTAIN WORKAREA ADDRESS. 



J 03 1 SEARCH SARTE'S (SART 

ENTRIES) LOOKING FOR WORK. 
IF FOUND, LOCK SARTE AND 
PUT SCCW ON THE IORB/IOSB 
PAIR. 

1 04 J START I/O AND UNLOCK 
SARTE. 

1 05 1 REPEAT FROM STEP 3 UNTIL 
ALL SARTE'S CHECKED. 

I 06 I DELETE THE FRR. 



07 RETURN TO DISPATCHER. 




1 01 1 ENTERED IN SRB MODE FROM 

DISPATCHER, ILRSWPDR FINDS AND 
STARTS I/O REQUESTS TO THE SWAP 
DATA SETS (ILRPTM AND ILRSRT 
TOGETHER DO THIS PROCESSING FOR 
THE PAGE DATA SETS) . SET FRR FOR 
RECOVERY AND RESET THE SCHEDULED 
COUNT (SARSRBCT=0) SO ANY 
SUBSEQUENT WORK PUT ON QUEUES 
WILL CAUSE A RE-SCHEDULE OF SWAP 
DRIVER. ILRSWP01 RECOVERY 
ROUTINE HANDLES ERRORS OCCURRING 
IN ILRSWPDR. 

| 02 | OBTAIN ADDRESS OF WORKAREA USED 
TO STORE REGISTERS ACROSS START 
I/O. 

| 03 | SEARCH SART ENTRIES (SARTE) 

LOOKING FOR WORK TO PROCESS. IF 
A SCCW IS FOUND TO PROCESS 
(SRESCCWQ) AND AN IORB/IOSB PAIR 
IS AVAILABLE (ILRFUSE-0) TRY TO 
LOCK THE SARTE TO PREVENT 
INTERFERENCE FROM ANOTHER COPY 
OF THE SWAP DRIVER. IF 
PREVIOUSLY LOCKED GO TO NEXT 
SARTE TO. PROCESS. IF LOCK I€ 
SUCCESSFULLY OBTAINED, PUT 



SCCW'S ON IORB-IOSB PAIRS AND 
POINT TO FIRST CCW. 

| 04 | ISSUE SIO (START I/O) MACRO TO 
IOS TO START THE OPERATION. 

1 05 1 UNLOCK THE SARTE AND REPEAT FROM 
STEP 3 UNTIL ALL SART ENTRIES 
HAVE BEEN CHECKED. 

| 06 | ISSUE SETFRR DELETE TO RESET THE 
RECOVERY ENVIRONMENT. 

I 07 I RETURN TO THE DISPATCHER. 



Diagram 25.3 ILRSWPDR (Part 1 of 1) 
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Output 



01 SAVE CALLER'S REGISTERS IN- 

1 ■ STANDARD SAVE AREA AND 

ESTABLISH ADDRESSABILITY. 



03 ESTABLISH RECOVERY. 



04 SET UP ADDRESSABILITY TO 
1 ' THE ASMVT. 



05 DETERMINE WHICH INTERNAL 

I 1 QUEUE TO PUT AIA ON, SWAP 

OR PAGE. 



^=> 



u 



i=> 





R 13 r- 


' | REGISTERS | 


1 M 






r |R «■ 1 




1 ATA 




'I 1 










| R 3 ASMVT 


1 1 H"l 1 








r |ASM3SWPQ | 


|- |ASM3GENQ 1 
AIA 


1 AIA 


'l 1 '1 1 







CALLED BY I/O COMPLETION, OR BY 
PART MONITOR. WITH REGISTER 1 
POINTING TO A CHAIN OF AIA'S AND 
REGISTER 13 POINTING TO AN 1 8 
WORD SAVEAREA. THE REGISTERS ARE 
SAVED IN THE CALLER'S SAVE AREA. 



ISSUE SETFRR TO ESTABLISH ERROR 
RECOVERY. ILRIOFRR HANDLES 
ERRORS OCCURRING IN ILRPAGCM. 



STANDARD ASM CONVENTION. 



THE AIA'S ARE PUT ON ONE OF TWO 
PUSH DOWN STACKS. IF THE AIA IS 
FOR A SWAP LSQA PAGE (AIALSQA=1) 
IT GOES ON THE SWAP QUEUE 
7ASM3SWPQ) , OTHERWISE IT GOES ON 
THE GENERAL QUEUE (ASM3GENQT. 
THE TWO QUEUES ARE MAINTAINED IN 
THE WORK AREA (ASMWKSA3) . 
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Input 



Processing 



Outfput 



| J r [ATAAIA 



|lNTGENQ | |-»>r 



I 



| INTSWAPQ | [-*■ 



06 IF THERE IS ANOTHER AIA TO 
1 ' PROCESS, GO TO STEP 5. 



HE 



IF THERE ARE ANY AIA'S ON - 
THE INTERNAL GENERAL QUEUE- 
FOR PAGECOMP SUBROUTINE, 
CALL PAGECOMP FOR 
COMPLETION PROCESSING. 



HIF THERE ARE ANY AIA'S ON 
THE INTERNAL SWAP QUEUE 
CALL SWAPCOMP FOR 
COMPLETION PROCESSING. 



L 



1 H p 






ATAAIA=0 







ATA 
[ ATAAIA 



WHILE PROCESSING IN THIS LOOP 
THE ATAAIA ALWAYS POINTS TO THE 
NEXT AIA TO PROCESS. PICK UP 
ATAAIA AND IF THERE IS ANOTHER 
AIA TO PROCESS GO TO STEP 5. 



IF ANY AIA'S WERE PUT ON THE 
INTERNAL GENERAL QUEUE, PASS 
THEM TO PAGECOMP FOR COMPLETION 
PROCESSING. THE AIA*S ARE PASSED 
VIA THE ATAAIA FIELD. 



IF ANY AIA'S WERE PUT ON THE 
INTERNAL SWAP QUEUE. PASS THEM 
TO SWAPCOMP FOR COMPLETION 
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Processing 



Output 



ASM3PIOP r->i 



I 



]_l 



t 



09 IF THERE ARE ANY AIA'S ON 

1 ■ THE ASM3PIOP QUEUE, CALL 

RSM. 



CO 



RSM ROUTINE 



10 IF THERE IS WORK ON THE 

1 ■ STAGING QUEUE, CALL 

ILRQIOE . 



CO 



ILRQIOE 



ASM ROUTINE 



11 DELETE FRR, RELEASE 

1 ' SALLOC, RESTORE REGISTERS 

AND RETURN CONTROL TO THE 
CALLER. 





TO CALLER 





R 3 AIA 


r 


1 


'1 1 


| w ASMVT 










ASMSTAGF 


ASMSTAGL 


AIA 




1- 











09 WHILE PROCESSING IN PAGECOMP AND 

I » SWAPCOMP SOME AIA T S MAY HAVE 

BEEN PUT ON THE QUEUE ?ASM3PIOP) 
TO PASS BACK TO RSM TlEAVPIOP) . 
IF ANY ARE ON THE QUEUE THE 
ADDRESS IN ASM3PIOP IS PUT INTO 
REGISTER 1 AND CONTROL IS PASSED 
TO IEAVPIOP. 



IS 

_ A'S I — 

WAITING TO BE PROCESSED" IF 
THERE IS AN ADDRESS IN THE FIRST 
POINTER (ASMSTAGF » NON-ZERO) 
CONTROL IS PASSED TO ILRQIOE TO 
niiTT.n Tfip'c 



BUILD IOE'S. 



03 



THE FRR IS DELETED, THE SALLOC 
IS RELEASED. THE REGISTERS 
RESTORED AND CONTROL IS RETURNED 
TO THE CALLER. 



ILRQIOE 
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Output 




PAGECOMP: 
foTl SET FOOTPRINT IN THE ATA. 



| 02 I IF THE TERMINATION 

INDICATOR IS ON PROCESS 
THE TERMINATION. IF NOT GO 
TO STEP 3. 



IF THERE WAS NO ERROR 
PROCESSING THE SLOT, 



CO 



ASM ROUTINE 



B. DECREMENT THE 
APPROPRIATE COUNT. 

C. QUEUE THE AIA TO THE 
ASM3PIOP TO BE PASSED 
TO RSM. GO TO STEP 9. 



| 03 | SET UP ADDRESSABILITY TO 
THE ASCB AND RSMHD. 



r 



1U 



i^ 



ij-*i 



ATAPCOMP=1 






ASMIORQC+1 



l! 



CONTROL IS RECEIVED FROM 
MAINLINE ILRPAGCM TO PROCESS ALL 
PAGE COMPLETIONS. REGISTER 3 
POINTS TO THE ASMVT AND REGISTER 
4 POINTS TO THE ATA WHICH HAS 
THE ADDRESS OF THE AIA'S TO BE 
PROCESSED. FOR RECOVERY 
PURPOSES, PAGECOMP INDICATES IT 
HAS CONTROL BY SETTING A BIT IN 
THE ATA. 

THE TERMINATION INDICATOR 
(AIATERMR-1) MEANS THAT THE 
ADDRESS SPACE WAS TERMINATED AND 
THAT CONTROL BLOCKS ARE NO 
LONGER AVAILABLE. THE AIA MUST 
BE GIVEN BACK TO IEAVPIOP AND: 

A. IF THERE WAS NO ERROR FREE 
THE SLOT FOR FURTHER USE. 

B. DECREMENT THE VIO OR NON-VIO 
(ASMVSC OR ASMNVSC) SLOT 
COUNT DEPENDING ON. THE TYPE 
OF PAGE. 

C. QUEUE THE AIA TO THE ASM3PIOP 
QUEUE (FOR RETURN TO 
IEAVPIOP) AND INCREMENT THE 



Routine 



COMPLETED COUNT (ASMIORQC) . 
GO TO STEP 9. 

| 03 | GET THE ADDRESSES FOR THE ASCB 

AND RSMHD FOR THE ADDRESS SPACE. 
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AIAWRITE=»1 



AIAIORTY-1 



AIA 


AIA 


I 












AIAWRITE=0 


AIAWRITE=1 




AIAIORTY=1 


AIAPRIER«1 





















[ 04 | CHECK IF THIS IS A VIO 

COMPLETION. IF NOT, GO TO 
STEP 5. 



IF THIS IS A RETRY AIA - 
FOR A WRITE OPERATION, 
FREE THE SLOT AND QUEUE 
THE AIA FOR ILRQIOE. GO 
TO STEP 9. 



iP 



C-> 



ASM ROUTINE 



IF AN I/O ERROR 
OCCURRED ON A WRITE, OR* 
IF A READ AND THE RETRY 
FLAG IS SET, QUEUE THE 
AIA TO THE STAGING 
QUEUE AND GO TO STEP 9. 



C. CALL VIO COMPLETION. GO- 
TO STEP 7. 



L 



CO 



ASM ROUTINE 





ASMVT AIA 








'I I 


ASMSTAGF 




ASMSTAGL 




AIA 


' 


I 











ASMVT 


AIA 




'I I 


ASMSTAGF 




ASMSTAGL 








AIA 




I I 





I 



1 04 J IF THIS IS NOT A VIO COMPLETION 
(AIAVIO=0) GO TO STEP5, ELSE: 

A. IF A RETRY WAS REQUESTED 
(AIAIORTY=1 ) THE AIA MUST BE 
SENT BACK TO ILRQIOE VIA THE 
STAGING QUEUE. IN ADDITION, 
IF IT WAS A WRITE 
(AIAWRITE=1) THE SLOT THAT 

WAS USED MUST BE FREED. GO TO 
STEP 9. 

B. IF THE REQUEST WAS FOR A 
WRITE AND AN ERROR OCCURRED 

(AIAWRITE=1 AND AIAPRIER'1) 
OR IF REQUEST WAS FOR READ 
AND RETRY IS SET (AIAWRITE»0 
AND AIAIORTRY-1) QUEUE THE 
AIA TO THE STAGING QUEUE. GO 
TO STEP 9. 

C. IN ANY OTHER CASE THE AIA 
WILL BE SENT TO ILRVIOCM FOR 
PROCESSING GO TO STEP 7. 
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AIAFRAUX=0 



AIAIORTY=0 



AIAPRIER=0 



AIASECER=0 



AIAERROR=0 



AIABADID=0 



AIASWPFX=1 



AIABADID=1 



| 05 | IF THERE WERE ANY SPECIAL 
BITS ON, GO TO STEP 7. 

A. FOR A DUPLEXED REQUEST, - 
CHECK IF BOTH REQUESTS " 
ARE COMPLETED. IF NOT, 
GO TO STEP 11. 

B. IF THE REQUEST IS A 
PRIVATE AREA PAGE, 
UPDATE THE XPTE. IF IT 
IS A FIXED SWAP PAGE, 
UPDATE THE SPCTE. GO TO 
STEP 9. 



C . IF REQUEST IS NOT A 
PRIVATE AREA, UPDATE 
THE XPTE AND GO TO STEP 
9. 

D. FOR READ REQUEST THERE 
IS NO UPDATE NECESSARY 
FOR THE XPTE. IT IS 
PASSED DIRECTLY TO STEP 
9. 

[q6~] IF THERE ARE ERRORS IN THE 
AIA, GO DIRECTLY TO STEP 
9. 



r 



[aiadpxct-i| 



XPTE 


SPCTE 






XPTLSID 




SPCTSSID 




XPTVALID=1 


SPCTLVAL=1 















XPTVALID*1 



1 05 1 IF THERE WERE NO SPECIAL BITS ON 
IN AIAFLG2, THE REQUEST IS A 
NORMAL COMPLETION AND IS HANDLED 
FIRST. 

A. FOR A DUPLEX REQUEST 
(AIADUPLX=1 ) , DECREMENT 

AIADPXCT. SET TO TWO 
ORIGINALLY, AIADPXCT MUST BE 
ZERO, BOTH REQUESTS 
COMPLETED, BEFORE RETURNING 
AIA TO RSM. IF AIADPXCT DOES 
NOT GO TO ZERO WHEN 
DECREMENTED, GO TO STEP 11 TO 
GET NEXT AIA. 

B. FOR A PRIVATE AREA COMPLETION 
(AIAPRIV-1 ) , A TRANSFER 
ADDRESS SPACE IS DONE TO 
ACCESS THE XPTE. THE LSID IS 
MOVED IN AND IT IS VALIDATED 

(XPTVALID=1 ) . FOR FIXED SWAP 
PAGES (AIASWPFX»1) THE SPCTE 
IS ALSO UPDATED (SPCTSSID AND 
SPCTLVAL) . 

C. FOR A NONERIVATE AREA 
COMPLETION A TRANSFER ADDRESS 
SPACE IS NOT REQUIRED. THE 
XPTE IS UPDATED AND 



D. FOR READ REQUESTS NO 
PROCESSING IS REQUIRED. 

| 06 | IF ANY SEVERE ERRORS (AIABADID 
OR AIAERROR) OCCURRED THE AIA'S 
ARE QUEUED FOR DIRECT RETURN TO 
IEAVPIOP (DONE IN STEP 9) . 
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AIAWRITE=1 



AIAWRITE=1 



AIAFRAUX=1 



AIAWRITE=1 



AIAIORTY=1 



Ui 



AIAWRITE=1 



AIAPRIER=1 



AIASECER=1 



| 07 | IF THIS IS A READ REQUEST 
(AIAWRITE=0) GO TO STEP 8. 
WRITE REQUESTS WILL BE 
PROCESSED HERE. 

A. IF THE REQUEST IS 

PURGED, FREE THE SLOT, 
DECREMENT THE COUNTS 
FOR A PRIVATE AREA PAGE 
AND GO TO STEP 9 . 



CO 



ASM ROUTINE 



IF THE RETRY FLAG IS 
FOUND ON, THE AIA WILL 
BE PUT BACK ON THE 
STAGING QUEUE FOR 
REDRIVE AFTER FREEING 
THE SLOT. GO TO STEP 
11. 



i!^ 



CO 



ASM ROUTINE 



IF ANY ERRORS WERE 
FOUND IN THE AIA, PUT 
THE AIA ON THE STAGING 
QUEUE FOR REDRIVE. GO 
TO STEP 1 1 . 



iU 



R 1 


ASMVT 


|lsid 1 

ASCB 


| ASMNVSC- 1 | 


| ASCBNVSC- 1 | 



ASMVT AIA 






J 'l I 


ASMSTAGF 




ASMSTAGL 













ASMVT AIA 








'I I 


ASMSTAGF 




ASMSTAGL 




AIA 


' 


I" 











J07 [ FOR WRITE REQUESTS: 



A. IF THE REQUEST WAS PURGED 
(AIAFRAUX=1) THE SLOT IS NOT 
NEEDED SO IT IS FREED UNLESS 
THERE WERE I/O ERRORS. THE 
USE COUNTS (ASCBNVSC, 
ASMNVSC) ARE DECREMENTED FOR 
PRIVATE AREA PAGES. GO TO 
STEP 9. 

B. IF THE AIA SPECIFIES THAT A 
RETRY SHOULD BE ATTEMPTED 

(AIAIORTY=1) THE SLOTS WHICH 
WERE ALLOCATED ARE FREED AND 
THE AIA IS QUEUED TO THE 
ASMSTAGQ. GO TO STEP 11. 

C. IF ANY I/O ERRORS OCCURRED 
(AIAPRIER=1 OR AIASECER=1) 

QUEUE THE AIA TO THE ASMSTAGQ 
FOR REDRIVE. GO TO STEP 11. 



Routine Label 



Routine Label 
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Output 



AIA 








I 


AIAPRIER=1 




AIALSID2=0 













n 



|08| FOR READ COMPLETIONS: 



IF THE REQUEST WAS 
PURGED, FREE THE SLOTS 
DECREMENT THE COUNTS 
AND GO TO STEP 9. 



CO 



ILRFRSL1 



ASM ROUTINE 



IF THE RETRY FLAG IS ON- 
QUEUE THE AIA TO THE 
STAGING QUEUE FOR 
REDRIVE. GO TO STEP 11. 



L 



C. FOR A DUPLEXED READ 
WITH AN ERROR, REDRIVE 
FOR SECONDARY COPY. GO 
TO STEP 11. 



FOR ERRORS WHICH ARE 
NOT DUPLEXED MARK THE 
XPTE. 



L 



R 1 


ASMVT 




LSID 








ASMNVSC-1 


ASCB 














ASCBNVSC-1 















ASMVT AIA 






J 'l I 


ASMSTAGF 




ASMSTAGL 











ASMVT AIA 






J "l I 


ASMSTAGF 




ASMSTAGL 











XPTIOERR=1 



[pi] FOR READ REQUESTS: 



A. IF THE SLOT WAS PURGED 
(AIAFRAUX=1) WHILE THE PAGE 
OPERATION WAS IN PROGRESS THE 
SLOT CAN BE FREED AND USE 
COUNTS DECREMENTED (ASCBNVSC, 
ASMNVSC) FOR PRIVATE AREA 
PAGES. IF NO I/O ERRORS 
OCCURRED, THE SLOT IS FREED. 
GO TO STEP 9. 

B. IF THE RETRY FLAG IS ON THE 
AIA MUST BE QUEUED FOR 
REDRIVE TO THE ASMSTAGQ. GO 
TO STEP 1 1 . 

C. FOR A READ REQUEST THAT WAS 
DUPLEXED, A PRIMARY ERROR CAN 
BE REDRIVEN TO TRY TO READ 
THE SECONDARY COPY. THE 
SECONDARY LSID (XPTLSID2) IS 
MOVED INTO THE PRIMARY FIELD 
(XPTLSID) AND INTO THE AIA 
(AIALSID) AND THEN QUEUED TO 

ASMSTAGQ FOR REDRIVE. GO TO 
STEP 11. 

p. FOR A NON-DUPLEXED READ ERROR 
THE ERROR IS INDICATED IN THE 



XPT (XPTIOERR-1). 
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ASHSWPOT=1 



ASHIOCNT-0 



foT] queue the aia to the 

INTERNAL QUEUE FOR 
IEAVPIOP AND INCREMENT THE 
COMPLETED COUNT 
(ASMIORQO . 

| 1 | IF THE ADDRESS SPACE IS 

INVOLVED IN A SWAP OUT AND 
THE LSQA PAGES CAN BE 
STARTED, GO TO ILRSLSQA TO 
PROCESS THE SWAP LSQA 
AIA'S. 



CO 



ILRSLSQA 



ASM ROUTINE 



|ll| IF THERE ARE MORE AIA'S TO 
PROCESS, GO TO STEP 2. 

| 1 2 | RESET THE FOOTPRINT IN THE 
ATA AND RETURN TO 
ILRPAGCM. 



Output 



£F^ 



RETURN TO 

ILRPAGCM 

MAINLINE 



l! 



ASMIORQC+1 



[oj] THE AIA IS NEXT QUEUED TO THE 
INTERNAL QUEUE (ASM3PIOP) FOR 
IEAVPIOP AND THE AIA COMPLETED 
COUNT (ASMIORQC) IS INCREMENTED. 

| 10| DETERMINE IF A SWAPOUT IS IN 

PROGRESS (ASHSWPOT=1) AND IF SO, 
IF ALL I/O FOR THE PRIVATE AREA 
PAGES HAS COMPLETED 
(ASHIOCNT=0) , THE LSQA PAGES CAN 
BE STARTED. IF THE LSQA CAN BE 
STARTED, ILRSLSQA IS CALLED TO 
START THEM. 

|11| THE NEXT AIA TO PROCESS IS 

PICKED UP FROM ATAAIA AND IF 
THERE IS ONE TO PROCESS GO TO 
STEP 2 . 



\m 



ALL THE AIA'S ARE NOW PROCESSED 
- RESET THE FOOTPRINT IN THE ATA 
AND RETURN TO ILRPAGCM. 



ILRSLSQA 
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R 3 


ASMVT 


1 H'l 1 


R 4 


ATA 


1 M' 








ATAAIA 









fc> 



J 



AIATERMR=1 



AIAPRIER=0 



AIABADID=0 



AIAERROR=0 



AIAPAGDS=1 



AIAWRITE=1 



SWAPCOMP - ROUTINE OF 
ILRPAGCM FOR HANDLING SWAP- 
LSQA COMPLETIONS. SET THE 
FOOTPRINT IN THE ATA FOR 
RECOVERY. 



IF THE AIA IS FOR A MEMORY 
THAT HAS BEEN TERMINATED, 
THE AIA CANNOT BE 
PROCESSED AND MUST BE 
RETURNED TO RSM IN THE 
MAINLINE . 



IF NO I/O ERRORS WERE 
ENCOUNTERED, THE SLOT 
OR SWAPSET IS FREED. 



CO 



ASM ROUTINE 



B. IF A PAGE DATA SET WAS 
USED. ADJUST THE 
APPROPRIATE COUNTS. 

C. CHAIN THE AIA (OR 
AIA'S) TO ASM3PIOP TO 
BE PASSED BACK TO RSM. 
GO TO STEP 7. 
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ATASCOMP-1 
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ASMNVSC- 1 



ASMVT AIA 






J 'l 1 


ASM3PIOP 













SET FOOTPRINT IN THE ATA TO 
INDICATE TO RECOVERY THAT 
PROCESSING IS NOW IN THE SWAP 
COMPLETION PART OF ILRPAGCM. 



IF THE TERMINATION BIT IS SET IN 
THE AIA (AIATERMR=1) , THE MEMORY 
THAT THIS AIA WAS CREATED FOR 
HAS BEEN TERMINATED AND THE 
ASMHD, SPCTE AND OTHER MEMORY 
RELATED CONTROL BLOCKS HAVE BEEN 
DESTROYED. FOR THIS REASON ONLY 
THE AIA CAN BE REFERENCED. 



IF THE AIA DID NOT HAVE AN 
I/O ERROR, FREE THE PAGE DATA 
SET SLOT (ILRFRSL1) OR THE 
SWAP DATA SET (ILRFRSW1). 



INCREMENT THE COUNT OF 
COMPLETED I/O REQUESTS 
(ASMIORQC), AND DECREMENT THE 
COUNT OF SLOTS FOR NON-VIO 
PAGES (ASMNVSC) . 



C. QUEUE THE AIA (OR GROUP OF 
AIA T S) TO ASM3PIOP FOR THE 
MAINLINE TO RETURN TO RSM. 



f03l FOR SWAP OUTS (AIAWRITE=1) GO TO 
I 1 STEP "i . 



ILRFRSLT 
ILRFRSLT 



ILRFRSL1 
ILRFRSW1 



Diagram 25.4.2 SWAPCOMP (Part 1 of S) 
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04 FOR SWAP IN REQUESTS: 



IF THE AIA SUFFERED A - 
NON-PAGING ERROR, QUEUE- 
IT FOR RETURN TO RSM IN 
THE MAINLINE. ADJUST 
COUNT OF COMPLETED I/O 
REQUESTS. IF AIA IS FOR 
A PAGE DATA SET, GO TO 
STEP 7. 

IF A RETRY IS REQUESTED- 
BECAUSE IOS SUFFERED AN 
INDETERMINATE ERROR. 

8UEUE AIA'S FOR PAGE 
ATA SETS TO THE 
STAGING QUEUE AND AIA'S 
FOR SWAP SETS TO THE 
WAIT QUEUE TO BE 
RETRIED. GO TO STEP 7. 

IF NO I/O ERRORS 
OCCURRED, THE SLOT OR 
SWAP SET IS FREED. IN 
ANY EVENT, INVALIDATE 
THE SWAP TABLE ENTRY 
AND QUEUE THE AIA TO BE 
RETURNED TO RSM IN THE 
MAINLINE. ADJUST THE 
APPROPRIATE COUNTS IF 
THE AIA IS FOR A PAGE 
DATA SET. GO TO STEP 7. 
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ASINVSC-1 



I 04 I FOR SWAP IN REQUESTS 
' 1 ( AIAWRITE-Ol : 



IF THE AIA HAD A NON-PAGING 
ERROR SUCH AS A BAD LSID 
PASSED BY RSM (AIABADID-1) OR 
AN INDETERMINATE ERROR 



IS QUEUED TO THE INTERNAL 
QUEUE TO BE RETURNED TO RSM 
BY THE MAINLINE. INCREMENT 
COUNT OF COMPLETED I/O 
REQUESTS (ASMIORQC) IF AIA 
WAS FOR A PAGE DATA SET. 



IF IOS HAD AN INDETERMINATE 
ERROR BUT NOTHING IS WRONG 
WITH THE ASM REQUEST jAIA) 
THE OPERATION SHOULD BE 
RETRIED (AIAIORTY-1). IF THE 
READ REQUEST WAS FOR A PAGE 
ON A PAGE DATA SET 
TaIAPAGDS-1) THE AIA IS 
PLACED ON THE ASMSTAGQ AND 
THE MAINLINE CALLS ILRQIOE TO 
RETRY THE OPERATION. IF THE 



TaIAPAGDS-0) THE AIA GROUP IS 
PLACED ON THE SARWAITQ SO 
THAT ILRSLSQA IS CALLED TO 
RETRY THE OPERATION TSTEP 8) . 



IF NO ERRORS OCCURRED, 

SLOT OR SWAP SET IS FR 

THE RELATED ENTRYTS) IN THE 
SWAP CONTROL TABLE ARE 
INVALIDATED (SPCTLVAL-O) 
BECAUSE THE AUXILIARY SLOTS 
NO LONGER EXIST. THE AIA(S) 
ARE PLACED ON THE QUEUE TO BE 
RETURNED TO RSM BY THE 
MAINLINE. IF THE AIA WAS FOR 
A PAGE DATA SET. INCREMENT 
THE COUNT OF COMPLETED I/O 
REQUESTS (ASMIORQCl, AND 
DECREMENT THE COUNT OF SLOTS 
FOR NON-VIO PAGES (ASMNVSC) . 



ILRFRSLT 
ILRFRSLT 



ILRFRSL1 
ILRFRSW1 



Diagram 25.4.2 SWAPCOMP (Part 2 of 5) 
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AIAPRIER=1 



AIAPAGDS=1 



AIAWRITE=1 



AIAPRI5R=1 



AIAPAGDS=0 



AIAERROR=1 



AIAWRITE=1 



AIAPRIER=0 



AIAERROR=0 



SWAPCOMP: 
[ 05 | FOR SWAP OUT REQUESTS: 



IF RETRY IS REQUESTED 
BECAUSE IOS HAD AN 
INDETERMINATE ERROR. 
FREE THE SLOT OR SWAP 
SET AND PUT THE AIA ON 
THE STAGING QUEUE 
(SLOTS) OR WAIT QUEUE 
AS APPROPRIATE TO BE 
RETRIED. GO TO STEP 6. 



Output 



CO 



ASM ROUTINE 



B. IF THERE WAS A WRITE 
ERROR ON A PAGE DATA 
SET, QUEUE THE AIA TO 
THE STAGING QUEUE TO BE 
RETRIED. IF THERE WAS A 
MISCELLANEOUS ERROR, 
TURN ON THE PERMANENT 
ERROR FLAG AND QUEUE 
THE AIA TO THE CAPTURE 
QUEUE. GO TO STEP 6. 

C. IF THERE WAS A WRITE 
ERROR ON A SWAP SET, 
TURN ON THE CAPTURE 
QUEUE ERROR FLAG. IF- 
THERE WAS A 
MISCELLANEOUS ERROR, 
TURN ON THE PERMANENT 
ERROR FLAG. QUEUE AIA 
TO CAPTURE QUEUE. GO TO 
STEP 6. 

D. IF NO ERROR OCCURRED, - 
UPDATE SWAP CONTROL 
TABLE AND QUEUE AIA TO 
CAPTURE QUEUE. 
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| 05 | SWAP OUT (AIAWRITE=1) REQUESTS: 

A. IF IOS SUFFERED AN 

INDETERMINATE ERROR, THE 
AIATs) MAY BE RETRIED. THE 
SLOT OR SWAPSETS ARE FREED 
AND THE AIA(S) QUEUED TO 
EITHER THE ASMSTAGQ (FOR PAGE 
DATA SETS) OR THE SARWAITQ 
IFOR SWAP SET) . ILRQIOE OR 
ILRSLSQA ARE CALLED TO RETRY 
FOR AIA'S ON THE QUEUES LATER 
IN PROCESSING. 



IF THERE WAS A WRITE ERROR ON 
THE OPERATION THIS AIA 
REPRESENTS AND THE ERROR 
OCCURRED ON A PAGE DATA SET, 
THE AIA IS QUEUED TO THE 
ASMSTAGQ SO THAT IT MAY BE 
WRITTENTO A DIFFERENT SLOT. 
IF THERE WAS A MISCELLANEOUS 
ERROR (AIAERROR-lT, TURN ON 
THE PERMANENT ERROft FLAG 
(ASHPERME-1 £ AND QUEUE THE 
AIA TO THE CAPTURE QUEUE. 

IF THERE WAS A WRITE ERROR ON 
A SWAP SET, TURN ON THE 
CAPTURE QUEUE ERROR FLAG 
(ASHCAPER-1T TO INDICATE THAT 
AN ERROR AIA CAPABLE FOR 
REDRIVE IS ON THE CAPTURE 
QUEUE. IF THERE WAS A 
MISCELLANEOUS ERROR 



(ASHPERME-1) WHICH MEANS THE 
AIA > S CANNOT BE REDRIVEN. 

8UEUE THE AIA TO THE CAPTURE 
UEUE. 



D. IF NO ERROR OCCURRED, UPDATE 
SWAP CONTROL TABLE ENTRY WITH 
LSID FROM AIA AND VALIDATE 
THE ENTRY. 



ILRFRSLT 
ILRFRSLT 



ILRFRSL1 
ILRFRSW1 



Diagram 25.4.2 SWAPCOMP (Part 3 of 5) 
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Processing 



Output 



ASHCAPER=1 



IF THE SWAP COUNT GOES TO 
ZERO, ALL LSQA OPERATIONS 
HAVE COMPLETED FOR A 
SPECIFIC ADDRESS SPACE. 

A. IF SWAP OUT WAS TO SWAP- 
DATA SETS AND NO ERRORS- 
WERE CAPTURED, UPDATE 
THE SWAP CONTROL TABLE 
ENTRIES . 



IF SWAP OUT WAS TO SWAP 
DATA SETS AND ERRORS 
WERE CAPTURED, FREE ANY 
SWAP SETS THAT ARE NOT 
IN ERROR. 



CO 



ASM ROUTINE 



IF NO ERRORS OCCURRED, - 
OR IF A PERMANENT ERROR- 
OCCURRED, RETURN ALL 
AIA T S AS A GROUP TO 
RSM. GO TO STEP 7. 



CO 



IEAVSWPC 



RSM ROUTINE 



D. IF A RETRYABLE ERROR 
OCCURRED, QUEUE ALL 



tU 



AIA'S TO THE SWAP 
QUEUE. CALL ILRSLSQA TO 



CO 



ILRSLSQA 



ASM ROUTINE 
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06 WHEN THE SWAP COUNT IS ZERO 

1 1 ( ASMSWPCT=0) . ALL LSQA AIA T S FOR 

THAT SPECIFIC ADDRESS SPACE HAVE 
COMPLETED AND BEEN CAPTURED. 



A. IF SWAP OUT WAS TO SWAP DATA 
SETS (AIAPAGDS=0) , AND IF NO 
ERRORS HAVE BEEN CAPTURED 
Tashcaper=o AND ASHPERME=0) , 
THE SPCTE'S (SWAP CONTROL 
ENTRIES! ARE VALIDATED 
7sPCTLVAL=lT AND THE LSID'S 
FOR EACH AIA ARE PLACED IN 
THE SWAP CONTROL TABLE FOR 
THE SUBSEQUENT SWAP IN. 

B. IF SWAP OUT WAS TO SWAP DATA 
SETS (AIAPAGDS=0f, AND ERRORS 
OCCURRED (ASHCAPER=1 OR 
ASHPERME-1) , ALL SWAP SETS 
THAT DO NOT CONTAIN ERRORS 

(AIAERROR-0 AND AIAPRIER*0) 
ARE FREED. 



IF NO ERROR OCCURRED, 
REGISTER IS SET TO 0. IF A 
PERMANENT ERROR OCCURRED, 
REGISTER IS SET TO 4 (TO 
INDICATE THE ABSENCE OR 
PRESENCE OF THE ERROR TO 
RSMJ. IN EITHER CASE, ALL THE 
AIA'S ARE RETURNED TO RSM'S 
SWAP COMPLETION ROUTINE. 



IF AN ERROR OCCURRED THAT CAN 
BE RETRIED (ASHCAPER-1 ) , ALL 
THE AIA T S ARE QUEUED TO THE 
SWAP QUEUE (ASHSWAPQ) . 
ILRSLSQA IS CALLED TO REDRIVE 
THE ENTIRE LSQA SWAP 
OPERATION. 



ILRSLSQA 



Diagram 25.4.2 SWAPCOMP (Part 4 of 5) 
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SARWAITQ 



Output 



IF THERE IS ANOTHER AIA TO 
PROCESS, GO TO STEP 2. 



IF THERE ARE AIA'S ON THE 
SARWAITQ, CALL ILRSLSQA TO 
PROCESS THEM, AS RESOURCES 
HAVE NOW BEEN FREED. 



CO 



ILRSLSQA 



ASM ROUTINE 



| TO | RETURN TO MAINLINE. 



RETURN TO 

MAINLINE 

ILRPAGCM 




E3 



IF THERE ARE MORE AIA'S ON THE 
INTERNAL SWAP QUEUE TO BE 
PROCESSED, GO TO STEP 2. 



08 IF THERE ARE AIA'S ON THE WAIT 

I 1 QUEUE ILRSLSQA IS CALLED TO 

PROCESS THEM, BECAUSE RESOURCES 
1SCCW T S) ARE NOW FREE TO PROCESS 
THEM. 



|09| RESET THE TRACKING BIT IN THE 
1 ■ ATA FOR RECOVERY. 

|10| RETURN TO THE MAINLINE. 



ILRSLSQA 



Diagram 25.4.2 SWAPCOMP (Part 5 of 5) 



5-148 OS/VS2 System Logic Library Volume 5 (VS2.03.807) 



VS2 .03.807 



Input 



Processing 



Output 



|Sr= 


=XPTE | 




|R2- 


"RSMHD | 




|R13=SAVE I 



J 



M 



XPTVALID=1 



XPTIOERR=0 



ILRFRSLT: 

| 01 | ENTRY POINT 

ILRFRSLT-CALLED FROM RSM 
TO FREE A SLOT. 

| 02 | STORE CALLERS REGISTERS. 



| 03 | IF THE PAGE IS VALID AND 
NO PREVIOUS ERRORS WERE 
ENCOUNTERED, FREE THE 
SLOT. IF THE PAGE WAS 
DUPLEXED, FREE THE SECOND 
SLOT. 



I 



ILRFRSLT IS THE MAIN ENTRY 
POINT. SECONDARY ENTRY POINTS 
ARE ILRFRSL1 AND ILRFRSW1 . THE 
MAIN ENTRY POINT IS USED BY RSM 
ROUTINES TO FREE A SLOT SUCH AS 
WHEN A PAGE IS FREED. THIS 
MODULE SETS NO FRR OR TRACKING 
BIT, IT MERELY RUNS AS A 
SUBROUTINE OF THE CALLER. 

STORE THE CALLERS REGISTERS IN 
THE SAVEAREA PASSED IN REGISTER 
13. 

IF THE XPTE IS VALID 

(XPTVALID=1) AND NO PREVIOUS 
ERRORS WERE DETECTED 

(XPTPRIER=0) , FREE THE SLOT BY 
SETTING THE APPROPRIATE PAT BIT 
TO 0. IF THE PAGE WAS DUPLEXED 

(XPTLSID2-r=0) , FREE THE SECOND 
SLOT IN THE SAME MANNER. 



Diagram 25.5 ILRFRSLT (Part 1 of 3) 
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04 1 RESET THE XPTE. GO TO STEP- 
11. 

05| ENTRY POINT 

ILRFRSL1 -CALLED BY ASM 
ROUTINES TO FREE A SLOT. 

| 06 | SAVE CALLER'S REGISTERS. - 
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1 04 1 RESET THE XPTE BY SETTING 

XPTVALID=0, XPTVIOLP=0 AND XPTID 
(THE TWO LSID'S) TO 0. GO TO 
STEP 11. 

| 05 | ENTRY POINT ILRFRSL1 IS CALLED 
BY ASM ROUTINES TO FREE A SLOT. 

| 06 | SAVE THE CALLERS REGISTERS IN 
THE CALLER PROVIDED SAVE AREA. 



Diagram 25.5 ILRFRSLT (Part 2 of 3) 
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EH 



FREE THE SLOT. GO TO STEP 



| 08 | ENTRY POINT ILRFRSW1 - 

CALLED BY ASM ROUTINES TO 
FREE A SWAP SET. 

1 09 I SAVE CALLER'S REGISTERS. 



10 FREE THE SWAP SET. 



| 11 | RESTORE CALLER'S 
REGISTERS. 



QE. 



RETURN TO CALLER. 



iU 



I 



1 07 1 FREE THE SLOT BY SETTING THE 

APPROPRIATE PAT BIT TO 0. GO TO 
STEP 11. 

[ 08 | ENTRY POINT ILRFRSW1 IS CALLED 
BY ASM ROUTINES TO FREE A SWAP 
SET. 

| 09 | SAVE THE CALLERS REGISTERS IN 
THE SAVE AREA PASSED BY THE 
CALLER. 

| 10 j FREE THE SWAP SET BY SETTING THE 
APPROPRIATE SAT BIT TO 0. 

| 11 | RESTORE THE CALLER'S REGISTERS. 

I 1 2 1 RETURN TO THE CALLER. 



Diagram 25.5 ILRFRSLT (Part 3 of 3) 
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I/O Subsystem 

The I/O Subsystem communicates with IOS to 
effect the physical transfer of data between real 
and auxiliary storage. When paging I/O is required, 
I/O Control schedules an SRB to start the I/O 
Subsystem processing. The I/O Subsystem selects 
the page data sets for which paging is pending, 
allocates slots if necessary, builds channel 
programs, calls IOS through the STARTIO macro to 
initiate the actual I/O, and, after return from IOS, 
returns the completed requests to I/O Control. 

The I/O Subsystem is "completion" driven, that 
is, the page completion portion of I/O Control 
drives the I/O Subsystem when previously 
scheduled I/O completes. Only when no I/O is 
currently outstanding is the I/O Subsystem driven 
by the initial page processing portion of I/O 
Control. 

I/O Subsystem processing is done by three 
modules: the Part Monitor (ilrptm), Slot Sort 
(ILRSRT), and Completion (ILRCMP). The I/O 
Subsystem contains one other module, the Message 
module (ILRMSGOO), which produces the messages 
issued by ASM. 

I/O Subsystem can be divided into two basic 
parts: Initial Processing (prior to the call to IOS), 
and Completion Processing (upon return from IOS). 

Initial Processing 

Initial Processing starts when ILRPTM receives 
control (SRB mode) from I/O Control. Paging 
requests are represented by lOEs (I/O Request 
Elements) pointing to AlAs (ASM I/O Request 
Areas). Before passing control to ILRPTM, I/O 
Control queues each IOE to the PARTE (Page 
Activity Reference Table Entry) for the ASM data 
set against which the paging request is being made. 

There are three queues of PARTEs. The first is a 
straight queue of PLPA, Common, and Duplex data 
set PARTEs. The other two are circular queues (the 
last PARTE on the queue points to the first) for 
local page data sets, one for fixed- and one for 
movable-head devices. ILRPTM examines all 
PARTEs on these two queues each time it is called. 
ILRPTM processes the PARTEs in the following 
order: PLPA, Common, Duplex, fixed-head queue, 
movable-head queue. 

ILRPTM scans each parte and calls Slot Sort 
(ILSRT) if all the following conditions are met: 

• There is a read or write request on the 

PARTE. 



• If the request is a write, there is at least one 
slot available in the data set represented by 
that PARTE. 

• The PARTE is not locked (in use by another 
CPU). If it is not, ILRPTM turns on an 
in-process flag to lock out this PARTE from 
other CPUs. 

• A PCCW (Program Channel Command 
Workarea, used by ASM to identify a page I/O 
request), is available. 

• An IORB (I/O Request Block) is available. 
The IORB is the main interface with IOS. 

There are two read queues on a parte, one 
sorted and one unsorted. Before passing control to 
ILRSRT, ILRPTM sorts the unsorted reads and 
inserts them onto the sorted queue. 

During processing, if the PLPA data set fills 
before all PLPA pages are written, the remainder 
are written to the Common paging data set. 
Conversely, Common writes can spill over into 
PLPA. If PLPA and Common are both full or one is 
unusable, ILRPTM calls the message routine 
(ILRMSGOO). If duplexing is active, ilrmsgoo 
notifies the operator that the system is relying on 
the secondary copy. If duplexing is not active, 
ILRMSGOO terminates the system. If the Duplex 
data set is unusable, but both PLPA and Common 
are not, the operator is notified and the system 
continues, relying on the primary copy. If Duplex is 
unusable and if PLPA or Common is unusable or 
both are full, ILRMSGOO terminates the system. 

ILRSRT sorts the I/O requests against a page 
data set in such a way that they can be processed 
with a minimum number of device revolutions. 
ILRSRT chooses a cylinder between the one it last 
used and the end of the data set. If none can be 
selected, ILRSRT starts again from the beginning of 
the data set. (If there is only one read and no 
writes to be done, ILRSRT takes a quick path to 
process the read, bypassing the cylinder selection 
process.) If no cylinder is found on the data set 
(no reads and no more available slots), the 
data-set-full return code is set and I/O processing 
for this data set on this ILRSRT invocation ceases. 

After ILRSRT selects a cylinder, it selects a slot, 
dequeues the IOE to be processed to that slot, 
builds a PCCW for the operation, and chains the 
PCCW from the IORB. When all requests possible 
for a specific cylinder are processed, ILRSRT finds 
the next cylinder for I/O. 

Processing of cylinders and slots stops when 
resources (PCCWs, lOEs, available slots, etc.) are 
exhausted or when the current service burst (the 
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maximum amount of time the channel/device can 
be tied up for a given set of operations) is met. 
Finally, ILRSRT completes initialization of an 
IORB-IOSB-SRB chain (IOSB is the I/O Supervisor 
Block) and branch enters IOS via the STARTIO 
macro. 

Completion Processing 

When the physical I/O operation completes, IOS 
returns control to the Completion module 
(ILRCMP) of the I/O Subsystem. The function of 
ILRCMP is to return AlAs to page completion 
(ILRPAGCM, part of I/O Control). If an error has 
occurred and retry is possible, ILRCMP causes an 
AIA to be reprocessed before returning it to 
ILRPAGCM. ILRCMP has four major routines: 

• Disabled Interrupt Exit (entry point 

ILRCMPDI). 

• Normal End Appendage (entry point 

ILRCMPNE). 

• Abnormal End Appendage (entry point 

ILRCMPAE). 

• Termination (ILRCMP). 

Any I/O completion involves at least two calls to 
ILRCMP entry points. For successful I/O, both calls 
are to ILCMPDI. If there were errors on the I/O, 
the first call is to ILCMPDI, and the subsequent 
calls are to other entries of ILRCMP depending on 
the types of errors. 

Disabled Interrupt Exit 

IOS first returns control to ILRCMPDI, passing it the 
address of an IOSB. ilrcmpdi follows the 
IOSB-IORB-S/PCCW chain, and processes the 
individual requests represented by the s/PCCWs. 
After a successful I/O, on the first branch entry to 
ILRCMPDI it frees the S/PCCWs, returns the 
associated AlAs to ILRPAGCM, and returns to ios. 
IOS branch enters ilrcmpdi a second time so that 
ILRCMPDI can release the IORB of the successfully 
completed request, and, if work remains on the 
associated parte/sarte, schedule ilrptm or 
ILRSWPDR as appropriate. On the first branch 
entry after an unsuccessful I/O, ilrcmpdi returns 
to IOS with a code indicating that the Post Status 
routine (iecvpst) should get control. IOS must 
schedule an SRB for POST status, who calls the 
appropriate entry in ILRCMP. 

Normal End Appendage 

IECVPST calls ILRCMPNE if the error is a 
wrong-length record or a unit exception. ILRCMPNE 
immediately returns to iecvpst with a code 



indicating that control should be passed to DASD 
ERP (Error Recovery Procedure) for retry. 

IECVPST also calls ILRCMPNE if DASD ERP 

retried successfully. In this case, ILRCMPNE 
removes the s/PCCWs from the IOSB-IORB, returns 
the s/PCCWs to the appropriate available queue, 
and returns the processed AlAs to ILRPAGCM. 

Abnormal End Appendage 

IECVPST calls ILRCMPAE on all errors other than 
the two mentioned in the previous section. If 
ILRCMPAE determines that the error is temporary, 
it returns immediately to IECVPST with a code 
indicating that control should be passed to DASD 
ERP for retry. 

If the error is permanent, it indicates that either 
an entire page/swap data set or a slot is unusable. 
If it is a data set error, control is passed to 
ILRMSG00 to determine whether the system can 
continue and to take appropriate action - either 
sending a message or taking the system down. 
Additionally, ILRCMPAE calls a subroutine to mark 
all the S/PCCWs as errors. If it is a slot error, 
ILRCMPAE records the LSID in a bad slot list in 
SQA and queues the error S/PCCW AIA to be 
returned to ILRPAGCM. ILRCMPAE rechains the 
S/PCCWs following the one in error and returns to 
iecvpst with a code indicating that a new 
STARTIO should be issued to retry them. 

Termination 

IECVPST calls ILRCMP if an ABEND occurs within 
IOS or within ILRCMPNE or ILRCMPAE. This means 
the status of the I/O is indeterminable, so ILRCMP 
marks all the AlAs for retry, returns them to 
ILRPAGCM, frees the IORB associated with the AlAs 
and schedules ilrptm or ilrswpdr as appropriate. 

iecvpst also calls ILRCMP after ilrcmpae or 
ilrcmpne has freed all the s/PCCWs. In this case, 
ILRCMP frees the IORB and schedules the SRB if 
necessary. 

Message Module 

The Message Module (ILRMSG00) is used by the 
Part Monitor (ILRPTM), I/O Completion (ILRCMP), 
and the recovery modules ILRCMP01, ILRSRT01 and 

ILRSWP01. 

ilrmsgoo has two primary functions: to write 
messages to the operator concerning the status of 
all page and swap data sets; to terminate the 
system when ASM is unable to continue. Reasons 
for termination are: plpa or Common has become 
unusable and there is no Duplex data set available; 
Duplex has become unusable and plpa/ Common is 
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unusable or both are full; the last Local page data 
set has become unusable. 

When ILRMSG00 is provided with a message 
number, it issues that message to the operator and 
returns to the caller. If the message number 
provided is eight, ILRMSG00 passes control to 
igfpterm to terminate the system. 



If a message number is not provided to 
ILRMSG00, it determines what message to issue and 
updates the appropriate flag and count fields in the 
ASMVT, PART, and SART. If necessary, ILRMSG00 
passes control to IGFPTERM to terminate the 
system. 
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I/O Subsystem 




























25.6 






25.8 


Part Mon 


tor 






I/O Completion 


(ILRPTM) 






(ILRCMP) 








25.8.1 
















' \ 




DIE Routine 
(ILRCMPDU 




25.7 






25.8.2 










Abnormal End 


Slot Sori 
(ILRSRT) 




J 


' \ 


' 




Appendage 
(ILRCMPAE) 








25.9 






25.8.3 








ASM Me 
Routine 
ILRMSC 


ssage 
300) 


Normal End 

Appendage 

(ILRCMPNE) 



25.x. - Module 

25.x.y. — Entry point in module 25.x. 

Figure 2-58. I/O Subsystem Overview 
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Input 




Processing 



ILRPTM: 

[ 01 | ILRPTM' S SRB IS SCHEDULED 
BY ILRPAGIO AND ILRCMP TO 
GET PAGE DATA SET 
PROCESSING STARTED. 

| 02 | MAKE SRB AVAILABLE FOR 
RESCHEDULING . 

| 03 | DETERMINE PAGE DATA SET TO 
PROCESS. 

| 04 | GET THE IOE'S FROM THE 

WRITE QUEUE FOR THE PAGE 
DATA SET. 

I 05 I LOCK THE PARTE. 



| 06 | GET AN AVAILABLE IORB. 



Output 




PARMLIST 




IORB 


PARE 


PCCW 


WRTQ 


BWK 







Notes 


Routine 


Label 


Ref 


Notes 


Routine 


Label 


Ref 


ED 


ILRPTM (PART MONITOR) RECEIVES 
CONTROL IN SRB MODE TO INITIATE 
WORK ON PAGE DATA SETS. THE 
INFORMATION ABOUT A PAGE DATA 
SET IS CONTAINED IN A PARTE IN 
THE PART. THERE IS ONE PARTE FOR 
EACH PAGE DATA SET. FOR RECOVERY 
PURPOSES, ILRSRT01 RECOVERY 
ROUTINE HANDLES ERRORS OCCURRING 
IN ILRPTM. 








READ QUEUES ARE PARENODE AND 
PAREIOE, RESPECTIVELY. THE 
ADDRESS OF THE PARTE SELECTED IS 
PUT IN THE PARAMETER LIST. 

|04| ALL IOES CHAINED ON THE WRITE 

QUEUE ARE REMOVED AND PUT ON THE 
WRITE QUEUE IN THE PARAMETER 
LIST. THE ASM CLASS LOCK WILL 
SERIALIZE THE WRITE QUEUES. 




GETWRTQ 


25.6.1 


(02] 


ONLY 1 SRB FOR ILRPTM CAN BE 
SCHEDULED AT A TIME. IF ANY WORK 
IS ADDED AFTER THIS ENTRY, 
ILRPTM WILL BE SCHEDULED AGAIN. 








| 05 | THE PART ENTRY IS LOCKED TO 

SERIALIZE PROCESSING OF THE PAGE 
DATA SET. 

[0_6j PUT THE IORB ADDRESS IN THE 








|03j 


A PAGE DATA SET WILL BE 
PROCESSED IF THERE ARE WRITES ON 
ITS CORRESPONDING WRITE QUEUE IN 
THE PART HEADER, OR READS IN 
EITHER OF ITS READ QUEUES 
(SORTED AND UNSORTED) IN THE 
PARTE, AND THAT PARTE IS NOT 
CURRENTLY BEING PROCESSED. THE 
POSSIBLE WRITE QUEUES ARE 
PARTCOMQ, PARTDUPQ, AND 
PARTLOCQ. MORE THAN ONE PARTE 
CAN POINT TO THE SAME WRITE 
QUEUE. THE SORTED AND UNSORTED 








PARAMETER LIST. IF THERE ARE NO 
IORB'S FOR THIS PARTE AT ALL, 
PART MONITOR ABENDS 084 SO THAT 
RECOVERY CAN BUILD AN IORB FOR 
THIS PARTE. IF NO IORB IS 
AVAILABLE, THE PART ENTRY IS 
UNLOCKED AND PROCESSING 
CONTINUES AT THE NEXT ENTRY. 
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Input 



Processing 



Output 



ASMPCCWQ 



y? 



IORB 



PARE 
PCCW 
WRTQ 
BWK 



07 GET A PCCW. 



08 SORT ANY UNSORTED READS. 



| 09 | SORT THE REQUESTS AND 
START THE I/O. 



CO 



ASM ROUTINE 



|10| REPEAT STEPS 3-9 UNTIL ALL 
PART ENTRIES HAVE BEEN 
PROCESSED. 

|ll| IF A PCCW IS LEFT IN THE 
PARAMETER LIST, RETURN IT 
TO THE PCCW AVAILABLE 
QUEUE'. 

| 1 2 | IF WRITE REQUESTS ARE LEFT 
IN PARAMETER LIST, RETURN 
THEM TO THE APPROPRIATE 
PART HEADER WRITE QUEUE. 



PARTE 










PARENODE 











| 07 | PUT. THE PCCW ADDRESS IN THE 

PARAMETER LIST. IF NO PCCW IS 
AVAILABLE THE IORB IS MADE 
AVAILABLE, THE PARTE UNLOCKED, 
AND PART MONITOR EXITS. 

| 08 | AN ADDITIONAL CHECK IS MADE TO 

DETERMINE IF THERE IS STILL WORK 
TO DO, AND ANY UNSORTED READS 
ARE SORTED ACCORDING TO CYLINDER 
LOCATION AND PUT ONTO THE SORTED 
READ QUEUE (PARENODE) . 

1 09 1 ILRSRT IS CALLED TO SORT 

REQUESTS, BUILD THE CHANNEL 
PROGRAMS, AND START THE I/O. 

| 1 [ THE PART ENTRIES ARE PROCESSED 
IN THE FOLLOWING ORDER - PLPA, 
COMMON, DUPLEX, QUEUE OF ALL 
FIXED HEAD LOCALS, QUEUEU OF ALL 
MOVABLE HEAD LOCALS. CALL DSFULL 
TO DETERMINE WHICH DATA SETS ARE 
FULL AND WHICH CAN ACCEPT A 
WRITE. FOR DRUMS, IF MORE WORK 
REMAINS, STEPS 6-9 ARE REPEATED. 



03 



THE PCCW ADDRESS IS KEPT IN THE 



on 



PARAMETER LIST. IF ILRSRT 
RETURNS A PCCW, STEP 7 WILL NOT 
HAVE TO BE DONE FOR THE NEXT 
PARTE. FINAL CLEANUP REQUIRES 
THAT ANY RESOURCES REMAINING BE 
RETURNED. 

IF WRITES ARE RETURNED FROM 
ILRSRT, STEP 4 WILL HAVE TO BE 
EXPANDED FOR THE NEXT PARTE AS 
FOLLOWS. IF THE PREVIOUS WRITE 
QUEUE IS THE SAME AS THE CURRENT 
WRITE QUEUE, THE NEW WRITES ARE 
JUST ADDED TO THE QUEUE IN THE 
PARAMETER LIST. IF THEY ARE NOT 
THE SAME, THE OLD WRITES WILL BE 
PUT BACK ON THEIR WRITE QUEUE 
BEFORE THE NEW ONES ARE 
OBTAINED. FINAL CLEANUP REQUIRES 
THAT ANY WRITES REMAINING BE PUT 
BACK ON THE APPROPRIATE QUEUE. 



Diagram 25.6 ILRPTM (Part 2 of 3) 
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Processing 



Output 



]=£r 



D3 



IF ANY AIA'S ARE ON 
PARTAIAE QUEUE, PASS THEM 
TO ILRPAGCM FOR FURTHER 
PROCESSING. 



CO 



ASM ROUTINE 



D3 



RETURN TO DISPATCHER. 




Notes 



| 1 3 | ANY ERROR AIA'S RETURNED BY 

ILRSRT WILL BE REMOVED FROM THE 
PARTAIAE QUEUE TO BE PASSED TO 
ILRPAGCM. 

QTj ILRPTM RUNS IN SRB MODE SO 
CONTROL IS RETURNED TO THE 
DISPATCHER. 



Diagram 2 5.6 ILRPTM (Part 3 of 3) 
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Input 



Processing 



Output 




PARTCOMQ 



PARTDUPQ 



PARTLOCQ 



PAREWTQE 



GETWRTQ: 



IF THE WRITE QUEUE OF THE 
PREVIOUS PARTE IS NOT THE 
SAME FOR THE CURRENT PARTE 
AND WRITE REQUESTS ARE ON 
THE INTERNAL QUEUE: . 

A. GET ASM CLASS LOCK. 

B. SET LOCK INDICATOR. 



C. RETURN WRITES ON 

INTERNAL QUEUE TO FRONT 
OF WRITE QUEUE OF 
PREVIOUS PARTE. 

1 02 | IF NO WRITE REQUESTS ARE 
ON INTERNAL QUEUE AND 
WRITES REQUESTS ARE ON 
WRITE QUEUE OF CURRENT 
PARTE. 

A. GET ASM CLASS LOCK, IF 
NOT HELD AND SET 
INDICATOR . 

B. PUT ALL WRITES FROM 
CURRENT WRITE QUEUE ON 
INTERNAL QUEUE. 



-LtZ^ 



PART 










PARTCOMQ 


PARTDUPQ 


PARTLOCQ 




PAREWTQE 









R 1 


PARMLIST 


I | J ' 








WTQE 









WRITE REQUESTS FOR THE CURRENT 
PARTE (PAGE DATA SET) ARE TO BE 
OBTAINED. ALL WRITE REQUESTS ARE 
IN QUEUES IN THE PART HEADER OR 
ON THE INTERNAL QUEUE BEING 
PASSED TO ILRSRT. ANY WRITE 
REQUESTS NOT PROCESSED BY ILRSRT 
FOR THE PREVIOUS PARTE ARE STILL 
ON THIS INTERNAL QUEUE. IF A 
PARTE HEADER WRITE QUEUE 
DIFFERENT FROM THE PREVIOUS ONE 
IS TO BE USED FOR THE PARTE AND 
REQUESTS ARE LEFT ON THE 
INTERNAL QUEUE, THE INTERNAL 
QUEUE IS CLEARED (WRITE REQUESTS 
RETURNED TO ORIGINAL QUEUE) . THE 
INTERNAL QUEUE WILL BE FILLED IN 
STEP 2. 

IF THERE ARE NO WRITE REQUESTS 
ON THE INTERNAL QUEUE, IT IS 
FILLED WITH NEW REQUESTS FROM 
THE APPROPRIATE PART HEADER 
QUEUE FOR THE CURRENT PARTE. 



Routine Label 



Diagram 25.6.1 GETWRTQ (Part 1 of 2) 
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| 03 | IF PREVIOUS PARTE WRITE 
QUEUE IS THE SAME FOR 
CURRENT PARTE AND WRITE 
REQUESTS ARE ALREADY ON 
INTERNAL QUEUE, LEAVE AS 
IS. 

| 04 | RELEASE ASM CLASS LOCK, IF 
HELD, AND RESET INDICATOR. 



RETURN TO 

ILRPTM 

MAINLINE 



1 03-| SINCE BOTH PARTES ARE TO USE THE 
SAME PART HEADER QUEUE OF WRITE 
REQUESTS, USE THE REQUESTS LEFT 
OVER FROM LAST PARTE PROCESSING. 

[oT| LOCK INDICATORS SET SO THAT LOCK 
WILL BE OBTAINED ONLY ONCE AND 
FREED ONLY ONCE. 



Label 



Diagram 25.6.1 GETWRTQ (Part 2 of 2) 
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1 01 | REMOVE READ IOES FROM 
PARTE QUEUE. 

| 02 | COMPUTE CYLINDER AND SLOT 
NUMBER WITHIN CYLINDER. 

| 03 | PERFORM TREE SORT ON IOE 

ACCORDING TO RELATIVE SLOT 
NUMBER . 

| 04 | ADD IOE TO SORTED READ 
QUEUE. 

| 05 | SPECIAL CASE: IF THIS IS 
THE ONLY READ AND THERE 
ARE NO WRITE REQUESTS, SET 
SPECIAL INDICATOR ON 
SORTED TREE. 

I 06 I RETURN. 



iU 



PARTE 


IOE 




PARENODE 


r 




IOENXTLE 




IOENXTGT 




MA 


IOEAIA 


; 


IOEBKPTR 





















THE ENTIRE CHAIN OF READ 
REQUESTS (IOES) IS REMOVED FROM 
PAREIOEQ AND PAREIOEQ IS SET TO 
ZERO. COMPARE AND SWAP (CS) IS 
USED FOR SERIALIZATION. 



| 02 | THE READ IOES ARE SORTED 
ACCORDING TO CYLINDER AND 
RELATIVE SLOT NUMBER. 

| 03 | EACH IOE IS PLACED ON A 

TWO-DIRECTION TREE ACCORDING TO 
ITS RELATIVE SLOT NUMBER. ONE 
DIRECTION REPRESENTS LESS THAN 
OR EQUAL, THE OTHER DIRECTION 
REPRESENTS GREATER THAN. IN 
ORDER TO GROUP IOES REPRESENTING 
READ REQUESTS FROM THE SAME 
CYLINDER TOGETHER AN INSERTION 
IS SOMETIMES NECESSARY IN THE 
MIDDLE OF A 'LEG' OF THE TREE. 
THE TOP OF THE TREE IS POINTED 
TO BY PARENODE. 

[04J IF THERE ARE NO READS ALREADY ON 
THE TREE, JUST SET TOP NODE 
(PARENODE) TO POINT TO THIS IOE. 
OTHERWISE, CALL ADRTTREE TO ADD 



25.6.4 



THE IOE TO THE SORTED READ 
QUEUE . 

IF THIS IS THE ONLY READ AND 
THERE ARE NO WRITES, SET 
PARENODE TO ITS COMPLEMENT FOR A 
SPECIAL PATH THROUGH ILRSRT. 



Diagram 25.6.2 SORTREAD (Part 1 of 1) 
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fc> 



| 01 | IF PLPA IS FULL, SET THE 
PLPA FULL INDICATOR. 

1 02 1 IF COMMON IS FULL, SET THE 
COMMON FULL INDICATOR. 

| 03 | IF DUPLEX IS FULL, 

INDICATE THAT DUPLEXING IS 
SUSPENDED . 



| 04 | IF PLPA IS FULL AND COMMON- 
IS USABLE, SET UP COMMON 
AREA WRITES TO GO TO 
COMMON . 



| 05 | IF COMMON IS FULL AND PLPA- 
IS USABLE, SET UP COMMON 
AREA WRITES TO GO TO PLPA. 

| 06 | IF PLPA IS FULL, COMMON IS 
FULL, AND DUPLEXING IS ON, 
MARK EACH AIA LSID FIELD 
ZERO AND PUT THE AIA ON 
THE PART ERROR QUEUE. 



r 



PARTS PLQ 



PARTCOMQ 



Notes 



j 01 I IF PLPA DATA SET IS FULL (NO 

MORE SLOTS AVAILABLE) , SET THE 
FLAG IN ASMVT (ASMPLPAF) . 

| 02 | IF COMMON DATA SET IS FULL, SET 
THE FLAG IN ASMVT (ASMCOMMF) . 

| 03 | IF DUPLEX DATA SET IS FULL, SET 
THE FLAGS INDICATING DUPLEXING 
IS SUSPENDED (ASMDUPLX OFF, 
ASMNODPX ON) . 

[04| IF PLPA IS FULL, COMMON IS NOT 
MARKED BAD, AND COMMON IS NOT 
FULL, SET UP FOR WRITES TO GO TO 
THE COMMON DATA SET BY SETTING 
PAREWTQE TO FOR PLPA AND 
PAREWTQE TO THE ADDRESS OF THE 
PARTCOMQ FOR COMMON. 

1 05 1 IF COMMON IS FULL AND PLPA IS 
NOT MARKED AS BAD, AND PLPA IS 
WOT FULL, SET UP FOR THESE 
WRITES TO GO TO PLPA BY MOVING 
WRITES TO THE SPECIAL SPILL 
WRITE QUEUE. 



IF PLPA AND COMMON ARE FULL AND 
DUPLEXING IS STILL ACTIVE, EACH 
AIA ON THE WRITE QUEUE IS MARKED 
AS AIALSID EQUAL ZERO AND PUT ON 
THE PART ERROR QUEUE. THESE AIAS 
WILL LATER BE SENT TO ILRPAGCM 
TO HANDLE. 



Diagram 25.6.3 DSFULL (Parti of 2) 
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|07| IF DUPLEXING IS FULL AND 
BOTH PLPA AND COMMON ARE 
USABLE, MARK EACH AIA AS A 
DUPLEX ERROR AND PUT IT ON 
THE PART ERROR QUEUE. 

| 08 | IF PLPA IS NOT USEABLE, 

COMMON IS NOT USEABLE, AND 
DUPLEXING IS NOT ACTIVE 
TERMINATE THE SYSTEM. IF 
CONTINUING, ISSUE THE 
APPROPRIATE MESSAGE. 



IF DUPLEX DATA SET IS FULL AND 
BOTH PLPA AND COMMON ARE 
USEABLE, ALL AIAS ON THE DUPLEX 
WRITE QUEUE WILL BE MARKED AS 
SECONDARY ERROR AND PUT ON THE 
PARTAIAE QUEUE. THESE AIAS WILL 
LATER BE SENT TO ILRPAGCM TO 
HANDLE. 

IF ACCESS TO SOME PLPA OR COMMON 
PAGES HAS BEEN LOST, ILRMSGOO 
TERMINATES THE SYSTEM. IF 
PROCESSING CAN CONTINUE, 
ILRMSGOO INFORMS THE OPERATOR OF 
WHAT HAS JUST HAPPENED, IF HE 
HAS NOT ALREADY BEEN INFORMED. 



Diagram 2S.6.3 DSFULL (Part 2 of 2) 
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Input 



FROM SORTREAD 

(ILRPTM 

SUBROUTINE) 



=JF 



fe 



Output 



PUT AN IOE ONTO ITS 
APPROPRIATE PLACE ON THE 
TREE OF READ IOES. 



lU 



TO CALLER. 



PARTE 


IOE 




PARENODE 


j~* 


IOENXTLE 




IOENXTGT 






IOEAIA 




IOEBKPTR 











THE TREE OF READ IOES IS POINTED 
TO BY PARENODE. A BACKWARD 
POINTER IS USED TO ALLOW UPWARD 
AS WELL AS DOWNWARD MOVEMENT 
WHEN SCANNING THE TREE. AN 
INSERTION IS NECESSARY WHEN 
NORMAL SORTING WOULD SEPARATE 
TWO NODES ASSOCIATED WITH 
REQUESTS FOR THE SAME CYLINDER. 



Routine 



Label 



Ref 



Diagram 25.6.4 ADRTTREE (Part 1 of 1) 
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Processing 



i 



WRTQ 



T 



Output 



FROM ILRPTM 



*C 



Cd 



ILRSRT: 
I 1 I INITIALIZE WORK VARIABLES, 



1 02 J IF ONLY 1 READ AND NO 
WRITES : 

A. REMOVE READ FROM QUEUE. 

B. BUILD CONTROL BLOCKS 
FOR THAT REQUEST. 

[q7| IF MORE THAN ONE READ 
AND/OR WRITE: 

A. SELECT THE NEXT 
CYLINDER TO BE 
PROCESSED. 

B. PROCESS REQUESTS ON 
CYLINDER BASIS. 

[04] FINAL SET UP FOR CALL TO 
IOS. 

1 05 J RETURN IOES TO AVAILABLE 
QUEUE OF IOES. 

I 06 I SET UP RETURN CODE. 




[oTJ 



ILRSRT IS CALLED BY ILRPTM TO 
PROCESS ONE PAGE DATA SET. 
ILRSRT PREPARES THE I/O REQUESTS 
FOR A SERVICE BURST OF WORK AND 
STARTS THE I/O. INITIALIZE 
WORKING VARIABLES, ESTABLISH 
CONTROL BLOCK ADDRESSABILITY. 
FOR RECOVERY PURPOSES, ILRSRT01 
RECOVERY ROUTINE HANDLES ERRORS 
OCCURRING IN ILRSRT. 

A SPECIAL PATH FOR ONE READ AND 
NO WRITES - PARENODE (THE SORTED 
READ QUEUE) WILL BE NEGATIVE. 

A. REMOVE READ FROM QUEUE, ZERO 
QUEUE AND COMPLEMENT ADDRESS 
TO GET VALID ADDRESS. 

B. CALL PROCHIT TO BUILD CCWS 
FOR THIS REQUEST. 



| 03 | NORMAL PATH THROUGH SLOT SORT: 

A. DETERMINE CYLINDER TO PROCESS 
BASED ON THE CURRENT POSITION 
OF THE CYLINDER. 

B. CALL PROCREQS TO DETERMINE 



Routine Label 



PROCREQS 



25.7.1 



25.7.2 



25.7.4 



[04] 



(BASED ON FEWEST REQUIRED 
ROTATIONS) WHICH REQUESTS 
WILL BE PROCESSED. PROCESSING 
CONTINUES UNTIL ENOUGH 
REQUESTS TO FILL THE SERVICE 
BURST ARE BUILT, NO MORE 
PCCWS ARE AVAILABLE, OR THERE 
ARE NO MORE REQUESTS. 

CALL IO TO COMPLETE SET UP AND 
TO ISSUE THE SIO (START I/O) 
MACRO. 



1 05 1 USE COMPARE AND SWAP (CS) TO 

RETURN STRING OF ALL THE IOES. 



1 06 J RETURN CODES: - SUCCESSFUL, NO 
WORK REMAINING. 4 - SUCCESSFUL, 
READS AND OR WRITES LEFT. 8 - 
DATA SET FULL, NO READS LEFT. 12 
- DATA SET FULL, READS LEFT. 



Routine Label 



Diagram 25.7 ILRSRT (Part 1 of 1) 
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PATCYLMLW 



PCT 

J\ PCTDTYPX 






PARERQTM 



| 1 | SET PAT CYLINDER MAP 
INFORMATION. 

1 02 1 SET ADDRESS OF DEVICE 
DEPENDENT FINDSLOT 
ROUTINE. 

| 03 | ZERO WORK VARIABLES. 



1 04 COMPUTE MAXIMUM NUMBER OF 
I/O REQUESTS TO PROCESS. 



CYLMPWDS CYLSLOTS 


1 II 1 




FSRTNPTR 


1 1 




SCYLCOPY SCYLREAD 


1 II 1 


SCYLRDWT SSLOT 


t II 1 


SRTELGS 


1 1 




REQNEED 


1 1 



|01 I OBTAIN INFORMATION NEEDED TO 
ACCESS APPROPRIATE SECTION OF 
PATMAP. THIS INFORMATION IS THE 
NUMBER OF WORDS TO MAP A 
CYLINDER AND THE NUMBER OF SLOTS 
IN A CYLINDER, AND IT IS 
DEVICE-TYPE DEPENDENT. 

| 02 | DEVICE TYPE IS DETERMINED FROM 

THE PCTCTYPX FIELD IN THE PCT. A 
SEPARATE FINDSLOT ROUTINE EXISTS 
FOR EACH DEVICE TYPE. 

| 03 | ZERO LAST CHOSEN SLOT NUMBER IN 
FINDSLOT PARM LIST, INITIALIZE 
ALL SLOT FLAGS OFF IN FINDSLOT 
PARM LIST, ZERO READ CYLINDER 
VALUE (INDICATING READ CYLINDER 
TO BE FOUND) , INITIALIZE ALL 
INTERNAL FLAGS OFF, ZERO RETURN 
CODE. 

1 04 1 THE COMPUTATION CONSISTS OF THE 
LENGTH OF A 'SERVICE BURST' 

(ASMBURST) DIVIDED BY THE TIME 
TO PROCESS A SINGLE REQUEST 

(PARERQTM) PLUS TWO. A MINIMUM 
OF TWO REQUESTS WILL ALWAYS BE 



SET IN REQNEED. 



Diagram 25.7.1 INITLZ (Part 1 of 1) 
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FROM PROCREQS 
OR ILRSRT 
MAINLINE 



J-l 



==0 



| 1 J INITIALIZE PCCW FOR I/O 

AND CHAIN TO IORB - IOSB. 



1 02 J PUT IOE ON INTERNAL 
AVAILABLE QUEUE. 



03 GET ANOTHER PCCW. 



TO PROCREQS OR 

ILRSRT 

MAINLINE 



IORB PCCW 
I |J-*| 



|01 | CALL IOCHAIN TO INITIALIZE PCCW 
AND CHAIN IT TO IOSB-IORB. 

1 02 1 PUT IOE ON INTERNAL QUEUE. WHEN 
PROCESSING COMPLETE, ALL IOES 
WILL BE FREED USING ONE COMPARE 
AND SWAP (CS) . 

| 03 | IF MORE REQUESTS TO PROCESS AND 
SERVICE BURST NOT MET YET, GET A 
ANOTHER PCCW FROM AVAILABLE 
QUEUE. 



Diagram 25.7.2 PROCHIT (Part 1 of 1) 
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WRITEQUE 



fc> 



CSCANCYL: 






HD 












^ 


ADDRESS IF THERE ARE ANY 








READS ON THE SORTED TREE 






E3 


(PARENODE) . 


f 


— > 










FOUND OR THE READ CYLINDER 








FOUND IS NOT THE SAME AS 


i — * 




THE STARTING POINT VALUE, 








IF WRITE REQUESTS EXIST, 








SEE IF A WRITE CYLINDER 








EXISTS BETWEEN THE 








STARTING POINT VALUE AND 








THE CURRENT END CYLINDER. 






[03] 














HAS READ REQUESTS QUEUED 








FOR IT, BUILD READ MASK. 











i — s 






i * 


AND NO READ REQUESTS 








EXIST, SET 'DATA SET FULL' 








RETURN CODE AND INDICATE 








TO STOP PROCESSING. 








r 


-I I 

V 
TO ILRSRT 
MAINLINE 











Output 



READCYL 
1 




THISCYL 






CYLINDER 

TO 

PROCESS) 




SCYLREAD 










RETCODEB 













Notes 



| 01 | STARTING POINT VALIE IS THE 

CYLINDER OF THIS DATA SET LAST 
PROCESSED. END CYLINDER IS 
INITIALLY SET TO THE END OF THE 
DATA SET. IF A NEW READ CYLINDER 
MUST BE FOUND, CALL GETRDCYL. 
SET THISCYL AND END CYLINDER 
EQUAL TO READCYL IF A READ 
CYLINDER IS FOUND. 

[ 02 | THE CURRENT END CYLINDER IS 

EITHER THE NEXT READ CYLINDER OR 
THE END OF THE DATA SET. WHEN 
THE END OF THE DATA SET IS 
REACHED, THE STARTING CYLINDER 
IS RESET TO THE BEGINNING OF THE 
DATA SET. CALL GETWCYL TO FIND 
WRITE CYLINDER. 

| 03 [ CALL BRDMASK TO BUILD MASK OF 

READ REQUESTS FOR THIS CYLINDER. 

| 04 | INDICATE RETURN CODE 64 TO 
INDICATE 'DATA SET FULL'. 



Diagram 25.7.3 CSCANCYL (Part 1 of 1) 
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PROCREQS : 

|01 | RESET LAST USED CYLINDER 
VALUE . 

| 02 j BUILD CYLINDER MAP MASKS. 



1 03 j SELECT EACH SLOT TO BE 
PROCESSED ACCORDING TO 
BEST ROTATIONAL POSITION. 

| 04 | BUILD A PCCW FOR EACH 
REQUEST. 

[05] IF ANY WRITES SELECTED FOR- 
PROCESSING, UPDATE PAT MAP* 
TO REFLECT THOSE 
UNAVAILABLE SLOTS. 



L 



u 





r* 




PCCWAIA 











1 01 1 SAVE CYLINDER NUMBER FOR NEXT 
CYLINDER SCAN SO THAT READ 
REQUESTS ARE PROCESSED WITH 
MINIMUM ROTATION. 

| 02 | FINISH BUILDING THE CYLINDER MAP 
MASKS TO BE USED IN PROCESSING 
REQUESTS ON THIS CYLINDER. 

| 03 | FIND NEXT BEST (REQUIRING FEWEST 
ROTATIONS) SLOT TO BE USED. 

J04] ASSIGN I/O TO SLOT FOUND VIA 

FINDSLOT ROUTINE. REPEAT STEPS 3 
AND 4 UNTIL NO MORE REQUESTS FOR 
THIS CYLINDER, A RESOURCE HAS 
RUN OUT, OR THE REQUEST QUOTA 
FOR THE SERVICE BURST HAS BEEN 
MET. 

| 05 | UPDATE PAT CYLINDER MAP AND PART 
ENTRY SLOTS AVAILABLE COUNT. 



Retf 



25.7.2 



Diagram 25.7.4 PROCREQS (Part 1 of 1) 
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Output 



J 



fe 





J * 




PCCWPCCW 


PCCWPCCW 







j 01 I IF ANY I/O TO BE STARTED: 

A. INCREMENT COUNT OF 
OUTSTANDING I/O 
REQUESTS . 

B. STORE THE TOD IN THE 
IORB. 

C. SET LAST CCW TO NOP 
WITH NO CHAINING. 

D. ISSUE STARTIO. 

| 02 | IF NO I/O TO BE STARTED, 
MAKE IORB AVAILABLE. 



c 



: 





IOSB 


IORB 




rl H 




SRB 


f 

PCCW 




'I 


1 ' 1 1 









1 01 I IF ANY REQUESTS QUEUED: 

A. INCREMENT COUNT OF 
OUTSTANDING IOSBS FOR ASM. 

B. IF THE SERVICE BURST HAS BEEN 
FILLED, STORE THE CLOCK. 
OTHERWISE, ZERO THE TOD (TIME 
OF DAY) . 

C. SET LAST CCW TO NOP (NO 
OPERATION) AND STOP CHAINING. 
THIS WILL END THE CHANNEL 
PROGRAM FOR THE CHANNEL. 

D. GO TO IOS VIA THE STARTIO 
MACRO. 

| 02 | IF NO I/O IS TO BE STARTED, TURN 
OFF THE 'IN USE' FLAG IN THE 
IORB. 



Diagram 25.7.5 IO (Part 1 of 1) 
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Processing 



Output 



[ORB 


PCCW 


IORPCCW 


J 'l 1 







FROM PROCHIT 

(ILRSRT 

SUBROUTINE) 



=u 



m 



,n 



IOCHAIN: 
I 01 I INITIALIZE PCCW. 



| 02 | COMPUTE RELATIVE BYTE 
ADDRESS (RBA) . 



1 03 j CONVERT RBA TO FULL SEEK 
ADDRESS . 



| 04 | INITIALIZE CCW STRING TO 
APPROPRIATE COMMANDS. 



u=$ 



TO CALLER 





IORB AIA 






IORPCCW 


'1 1 






PCCW 




PCCWIORB 


PCCWAIA 


PCCWADDR 













PARAMETER 



PCCWAIA IS SET TO POINT TO THE 
AIA CURRENTLY POINTED TO BY THE 
IOE FOR THIS REQUEST. PCCWIORB 
IS A BACKWARD POINTER TO THE 
IORB. THE REAL ADDRESS OF AREA 
TO WRITE OUT OR READ INTO IS PUT 
IN PCCWADDR. 

THE SLOT NUMBER IS CONVERTED TO 
AN RBA BY MULTIPLYING THE SLOT 
NUMBER BY 4096. 

CONVERT RBA TO A FULL SEEK 
ADDRESS (MBBCCHHR) . IF AN ERROR 
IS ENCOUNTERED DURING THE 
CONVERT A X*083' ABEND IS ISSUED 
SINCE EITHER THE EDB (EXTENSION 
DATA BLOCK) OR THE PAT HAS BEEN 
OVERLAID. 

THE APPROPRIATE STRING OF CCWS 
IS SET UP. FOR THE FIRST PCCW, 
THE CHANNEL PROGRAM STARTS WITH 
THE SET SECTOR FOR RPS 
(ROTATIONAL POSITION SENSING) 
AND THE SEARCH FOR NON RPS. THE 
READ/WRITE CCW IS CONVERTED TO 
THE APPROPRIATE CODE FOR READ OR 



WRITE. FOR ALL OTHER PCCWS, THE 
CHANNEL PROGRAM MAY START WITH A 
SEEK CYLINDER, SEEK HEAD, SET 
SECTOR, OR SEARCH DEPENDING ON 
THE PREVIOUS CCW STRING. A SET 
SECTOR IS ONLY USED WHEN THERE 
IS ENOUGH ROOM TO DO A SET 
SECTOR AND NOT LOSE A 
REVOLUTION. THE PREVIOUS LAST 
CCW IS SET TO A TIC TO THE FIRST 
CCW IN THIS PCCW. THE READ/WRITE 
CCW IS SET TO THE APPROPRIATE 
CODE. 



Routine Label 



Diagram 25.7.tf IOCHAIN (Part 1 of 1) 
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Input 



Processing 



FROM CSCANCYL 

(ILRSRT 

SUBROUTINE) 



fc> 



Output 



SCAN THE TREE TO FIND THE 
IOE REPRESENTING THE 
NEAREST CYLINDER ADDRESS 
BEYOND THE LAST USED 
CYLINDER ADDRESS. 




Notes 



1 01 | THE TREE, POINTED HO BY 

PARENODE, IS EXAMINED, MOVING 
DOWN ONE NODE AT A TIME ALONG 
THE APPROPRIATE LEG, KEYING ON 
THE CYLINDER ADDRESS VALUE 
ASSOCIATED WITH EACH IOE, IN 
SEARCH OF ONE OR MORE IOES 
REPRESENTING REQUESTS FOR THE 
NEAREST CYLINDER ADDRESS TO THE 
LAST USED CYLINDER ADDRESS. IF 
NO READ CYLINDER ADDRESS IS 
FOUND BETWEEN THE CURRENT C-SCAN 
•^.YLINDER SCAN) END POINTS, NO 
WORK VARIABLES ARE ALTERED. 
OTHERWISE READCYL IS SET TO NEW 
READY CYLINDER ADDRESS. 



Diagram 2S.7.7 GETRDCYL (Part 1 of 1) 



■rv"VV<SS» Sty-rU 



ivs? ^?.&iy 



VS2.03.807 



Input 



Processing 



Output 



FROM CSCANCYL 

(ILRSRT 

SUBROUTINE) 






|01| FIND A CYLINDER ADDRESS 

CONTAINING AN UNUSED SLOT. 




A FREE SLOT IS REPRESENTED BY A 
BIT OFF IN THE PAT MAP. THE SCAN 
IS PERFORMED BETWEEN THE 
BEGINNING AND ENDING CYLINDER 
VALUES PASSED AS INPUT 
PARAMETERS. IF NO CYLINDER 
ADDRESS IS FOUND THISCYL WILL 
NOT BE RESET. OTHERWISE, THISCYL 
WILL BE SET TO WRITE CYLINDER 
ADDRESS . 



Diagram 25.7.8 GETWCYL (Part 1 of 1) 
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Output 



FROM CSCANCYL' 

(ILRSRT 

SUBROUTINE) 



M 



BRDMASK: 

1 01 [ FIND THE NODE REPRESENTING 
THE READ REQUEST FOR THE 
LOWEST RELATIVE SLOT 
NUMBER IN THE CYLINDER. 

J02J FIND ALL NODES ON THE TREE- 
BELONGING TO THE SELECTED 
CYLINDER. 



TO CSCANCYL 




J 01 1 CALL GETLOLEC TO GET 

LESS-THAN-EQUAL-TO NODE FOR THIS 
CYLINDER. 

| 02 | THE APPROPRIATE BIT IN THE 

CYLINDER READ MASK (SCYLREAD) IS 
SET FOR EACH RELATIVE SLOT 
NUMBER FOUND REPRESENTING A READ 
REQUEST FOR THIS CYLINDER. 



Diagram 25.7.9 BRDMASK (Part 1 of 1) 
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Output 



FROM PROCREQS 

(ILRSRT 

SUBROUTINE) 



P-S 



^^> 



WRITEQUE 



1 01 J DETERMINE IF CYLINDER MAP 
IN PAT IS ONE-WORD OR 
TWO-WORDS AND COMPUTE 
ADDRESS ACCORDINGLY. 

| 02 | SET BIT ON FOR EACH READ 

REQUEST FOR THIS CYLINDER. 

j 03 | IF WRITE REQUESTS EXIST, 
SET BIT ON FOR EACH 
AVAILABLE SLOT. 



=0 



TO PROCREQS 



1 01 | THE 3330 IS THE ONLY DEVICE TYPE 
WHICH REQUIRES A 2-WORD MAP TO 
DESCRIBE ONE CYLINDER, AS THERE 
ARE 58 SLOTS (RECORDS) PER 
CYLINDER. 

1 02 1 A BIT IS TURNED ON IN SCYLRDWT 
FOR EACH READ REQUEST FOR THIS 
CYLINDER. 

1 03 1 IF WRITE REQUESTS EXIST, TURN ON 
A BIT IN SCYLRDWT FOR EACH 
AVAILABLE SLOT. 



Diagram 25.7.10 BILDMSKS (Part 1 of 1) 
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Input 



Processing 



Output 



FROM PROCREQS 

(ILRSRT 

SUBROUTINE) 






=l 



FINDS LOT: 

| 1 | FIND NEXT BEST SLOT 

ACCORDING TO LEAST ARM 
MOVEMENT REQUIRED. 

| 02 | UPDATE READ/WRITE MASK SO • 
SLOT WILL NOT BE CHOSEN 
AGAIN. 

| 03 | IF WRITE SELECTED SET 

APPROPRIATE BIT IN WRITE 
MASK TO LATER UPDATE PAT 
MAP. 

| 04 | DETERMINE IF READ SELECTED 
AND BRANCH TO APPROPRIATE 
ROUTINE. 

[ 05 | WRITE SELECTED, BRANCH TO 
APPROPRIATE ROUTINE. 



5* 



r 



TO GETREAD 



TO GET 

CO 



|01 | EACH DEVICE TYPE HAS A DIFFERENT 
TRACK LAYOUT DUE TO TRACK SIZE 
AND NUMBER OF TRACKS PER 
CYLINDER. A SEPARATE FINDSLOT 
ROUTINE IS USED TO DETERMINE THE 
NEXT BEST SLOT ON EACH DEVICE 
TYPE. 

| 02 | ROUTINE IS CALLED FOR EACH I/O 
REQUEST FOR THIS CYLINDER WITH 
SCYLRDWT AS INPUT. 

| 03 | FOR WRITE SLOTS SELECTED, PATMAP 
MUST BE UPDATED TO INDICATE SLOT 
IS ALLOCATED. 

| 04 | SLOT SELECTED IS FOR READ 
REQUEST. 

| 05 | SLOT SELECTED IS FOR WRITE 
REQUEST. 



Diagram 25.7.11 FINDSLOT (Part 1 of 1) 
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THISCYLA PAT 


1 l J> 




SCYLWRT 


PATMAP 




1 1 





FROM PROCREQS 

(ILRSRT 

SUBROUTINE) 



Co 



WRTUPDTE : 

[oT[ MARK THE WRITE SLOTS 

SELECTED FOR THIS CYLINDER 
AS UNAVAILABLE. 

| 02 | DECREMENT AVAILABLE SLOT - 
COUNT IN PART ENTRY. 



TO PROCREQS 



PAT 










CYL MAP 










PARTE 






PARESLTA 








EPAWRTCT 
1° 







THISCYLA CONTAINS THE ADDRESS OF 
THE CYLINDER MAP WITHIN THE PAT 
FOR THE CYLINDER SELECTED. 

EPAWRTCT IS AN INITIAL COUNT OF 
SLOTS THAT HAVE BEEN ASSIGNED 
FOR WRITES. PARESLTA, AVAILABLE 
SLOTS, IS DECREMENTED BY 
EPAWRTCT. EPAWRTCT IS SET TO 
ZERO. 



Diagram 25.7.12 WRTUPDTE (Part 1 of 1) 



Section 2: Method of Operation 5-177 



VS2.03.807 



Input 



Processing 



THISCYL 1 
1 1 1 


THISNODE 

1 1 





FROM BRDMASK 

(ILRSRT 

SUBROUTINE) 



M 



Output 



1 01 | GET IOE FOR LOWEST SLOT ON 
SELECTED CYLINDER. 




Notes 



1 01 I MOVE DOWN THE LEG OF THE TREE, 

STARTING FROM THE NODE PASSED AS 
INPUT, UNTIL THE END OF THE LEG 
IS REACHED OR THE CYLINDER 
NUMBER CHANGES. RETURN A POINTER 
TO THE LOWEST NODE STILL ON THE 
SELECTED CYLINDER . 



Diagram 25.7.13 GETLOLEC (Part 1 of 1) 
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Input 



Processing 



Output 



FROM FINDSLOT 

(ILRSRT 

SUBROUTINE) 



yf 



m 



TOPRDIOE IOE 

I i-r^flol 



J 01 [ COMPUTE RELATIVE SLOT 
NUMBER SELECTED. 

| 02 1 FIND THE IOE CORRESPONDING- 
TO THAT SLOT NUMBER. 

| 03 | REMOVE THE IOE FROM TREE. - 



iU 



TO PROCREQS 



TSLOTNBR 


IOE 


1 1 




IOENXTLE 




IOENXTOT 


TOPRDIOE 


IOEAIA 


1 | J 


IOEBKPTR 



IOEPTR 


IOE 






** 


IOEAIA 




'ARTE 




I 








PARENODE 















THE FINDSLOT ROUTINE PASSES A 
SLOT VALUE RELATIVE TO THE START 
OF A CYLINDER. THIS VALUE MUST 
BE CONVERTED TO THE RELATIVE 
SLOT NUMBER FROM THE BEGINNING 
OF THE PAGE DATA SET. 

FIND READ REQUEST ON TREE 
CORRESPONDING TO THE SLOT FOUND 
BY THE FINDSLOT ROUTINE. 

CALL REMVNODE TO REMOVE IOE FROM 
THE TREE (SORTED READ QUEUE - 
PARENODE) . 



. Label 



Diagram 25.7.14 GETREAD (Part 1 of 1) 



Section 2: Method of Operation 5-179 



VS2.03.807 



Input 



Processing 



WRITEQUE 



Output 



FROM FINDSLOT 
( ILRSRT 
SUBROUTINE) 



^f 



M 



r* 



iJf 



J 01 I COMPUTE RELATIVE SLOT 
NUMBER SELECTED. 

| 02 | REMOVE TOP WRITE IOE FROM 
WRITE QUEUE. 

| 03 | IF THE WRITE QUEUE IS NOW 
EMPTY, UPDATE THE 
READ/WRITE MASK. 

| 04 | INCREMENT COUNT OF WRITES 
SELECTED. 

[ 05 | BUILD SLOT IDENTIFIER IN 
AIA. 



c 



V 
TO PROCREQS 



TSLOTNBR 



[01 J THE FINDSLOT ROUTINE PASSES A 

SLOT VALUE RELATIVE TO THE START 
OF THE SELECTED CYLINDER. THIS 
MUST BE CONVERTED TO THE 
RELATIVE SLOT NUMBER FROM THE 
BEGINNING OF THE PAGE SPACE. 

1 02 [ THE FIRST WRITE IOE IS SELECTED 
TO USE THE SLOT CHOSEN BY 
FINDSLOT. 

| 03 | THE READ/WRITE MASK IS UPDATED 
SO THAT NO MORE WRITES WILL BE 
SELECTED. 

| 04 | THIS COUNT IS LATER USED TO 

UPDATE THE COUNT OF ALLOCATED 
SLOTS IN THE PART ENTRY 
(PARESLTA) . 

| 05 | BUILD LOGICAL SLOT ID(LSID) OF 

THE SLOT BEING WRITTEN TO IN THE 
AIA. 



Diagram 25.7.15 SETWRITE (Part 1 of 1) 
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Processing 



Output 



THISNODE IOE 



FROM GETREAD 

(ILRSRT 

SUBROUTINE) 



u 



1 01 | REMOVE IOE FROM TREE OF 
READS . 

[ 02 | RECHAIN ANY NODES HANGING 
FROM IT. 



TO GETREAD 



IOEPTR IOE 

I l-r*r— 



THE TREE OF READS IS POINTED TO 
BY THE PART ENTRY (PARENODE) . 
REMOVAL OF A NODE (IOE) FROM THE 
TREE REQUIRES UPDATING OF AN 
ANCESTOR NODE POINTING TO THE 
NODE BEING REMOVED. 

CALL RCHAINUP TO RECHAIN NODE, 
WHOSE ANCESTOR IS BEING REMOVED 
FROM THE TREE, TO ITS ANCESTOR'S 
ANCESTOR . 



Diagram 25.7.16 REMVNODE (Part 1 of 1) 
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Output 



FROM REMVNODE 

(ILRSRT 

SUBROUTINE) 



fe 



|01 | RESET ANCESTOR'S DOWNWARD 
POINTERS. 



1 02 | RESET DESCENDANT'S BACK 
CHAIN POINTERS. 



J 03 1 RESET THE TOP-READ-IOE IF 
NECESSARY . 



iP 



TO REMVNODE 



IF THE ANCESTOR NODE POINTS TO 
THE NODE(IOE) TO BE REMOVED 
THROUGH THE GREATER-THAN(GT) 
LEG, UPDATE THE ANCESTOR'S GT 
POINTER ( IOENXTGT) . OTHERWISE, 
UPDATE THE 

LESS -THAN-OR- EQUAL-TO ( LE ) 
POINTER ( IOENXTLE) . IF THE NODE 
BEING REMOVED IS THE TOP NODE OF 
THE TREE, THEN PARENODE MUST BE 
RESET. 

IF A NEXT NODE EXISTS, RESET THE 
BACKWARD POINTER OF THE NEXT 
NODE. 

IF THE IOE JUST REMOVED FROM THE 
TREE IS THE FIRST IOE OF READS 
FROM A SPECIFIC CYLINDER, THEN 
RESET THE TOP-READ-IOE PTR FOR 
THE GROUP. 



Diagram 25.7.17 RCHAINUP (Part 1 of 1) 
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Output 




CLEANUP : 
I 01 I RELEASE FRR. 



|02[ SET RETURN CODE IN CALLERS' 
SAVE AREA. 




J 1 I ZERO THE ILRSRT ENTRY IN THE 

EPATH (RECOVERY CONTROL BLOCK) . 

["oTj RETURN CODE HAS BEEN PREVIOUSLY 
SET BY SUBROUTINES OF ILRSRT, 
AND IS FURTHER CHANGED BY THIS 
ROUTINE TO INDICATE TO PART 
MONITOR THAT MORE WORK EXISTS, 
IF NECESSARY. 



Diagram 25.7.18 CLEANUP (Part 1 of 1) 
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ILRCMP (I/O COMPLETION) 
HAS THREE SECONDARY ENTRY 
POINTS: ILRCMPDI, 
ILRCMPAE. ILRCMPNE. THIS 
ENTRY, ILRCMP, IS CALLED 
BY IECVPST FOR TWO 
SITUATIONS. 



02 IF THE STATUS OF I/O IS 

1 1 UNDETERMINABLE (X'45' IN 

IOSCOD FROM IOS RECOVERY) : 



B. RETURN PCCWS/SCCWS TO 
AVAILABLE QUEUE. 

C. RETURN AIAS TO PAGE 
COMPLETION. IF NOT 
X r 45' CODE FROM IOS AND 
THERE ARE ANY 
PCCWS/SCCWS ON THE 
IORB, ABEND 084. 

I 03 I FREE THE IORB. 



SCHEDULE SRB FOR 
APPROPRIATE I/O DRIVER. 



rr=> 




FOR RECOVERY PURPOSES, ILRCMP01 
RECOVERY ROUTINE HANDLES ERRORS 
OCCURRING IN ILRCMP (ALL FOUR 
ENTRY POINTS) . ILRCMP ENTRY 
(TERMINATION ROUTINE FOR ASM) IS 
CALLED BY IECVPST (POST STATUS) 
ON TWO PATHS. ONE IS IF IOS 
RECOVERY IS ENTERED WHILE IOS 
WAS PROCESSING THIS IOSB. CODE 
X'45* IS PUT IN THE IOSCOD, 
IECVPST SCHEDULED, AND IECVPST 
CALLS ILRCMP. THE OTHER PATH IS 
WHEN IECVPST CALLS ILRCMP AFTER 
ALL THE PCCWS/SCCWS ARE FREED BY 
ILRCMPAE AND ILRCMPNE. 



IF X'45' CODE, ALL I/O SHOULD BE 
RETRIED SINCE STATUS OF I/O IS 
UNDETERMINABLE. 



ALL AIAS ARE MARKED FOR RETRY 
SO THAT PAGE COMPLETION CAN 
REDRIVE REQUESTS. 

PCCWS/SCCWS ARE RETURNED TO 
THE APPROPRIATE QUEUE. 



ALL AIAS ARE RETURNED TO PAGE 
COMPLETION. HAVING ADDITIONAL 
PCCWS/SCCWS ON THE IORB 
WITHOUT THE CODE X'45' 
CONDITION INDICATES ENTRY IN 
THE NORMAL END APPENDAGE 
WITHOUT IOSEX ON. THIS WILL 
ONLY OCCUR WITH CERTAIN 
HARDWARE MALFUNCTIONS. THE 
084 ABEND IS ISSUED TO CAUSE 
RE-ENTRY HERE WITH CODE 
X v 45' 



THE IORB IS MADE AVAILABLE. 



THE APPROPRIATE I/O DRIVER, 
ILRPTM OR ILRSWPDR, IS SCHEDULED 
WITH NO CHECKS FOR WORK. 



Diagram 25.8 ILRCMP (Part 1 of 1) 
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Output 



R 2 IOSB 




1 l J> 








IOSERR 




IOSCSW 




IOSDIESE=0 















FROM IOS 
(IECIOSCN) 



£b 



Jr 



L 



IF I/O COMPLETED 
UNSUCCESSFULLY OR WAS 
INITIATED BY DASD ERROR 
RECOVERY PROCEDURE, 
RETURN TO IOS. 



B. REMOVE SUCCESSFUL I/O 
REQUESTS FROM IOSB - 
IORB. 

C. RETURN FREE PCCWS/SCCWS 
TO AVAILABLE QUEUE. 



A. MAKE IORB AVAILABLE. 



03 RETURN TO IOS. 




ILRCMPDI, AN ENTRY IN ILRCMP, 
RECEIVES CONTROL WHEN I/O 
COMPLETES WHETHER IT IS STARTED 
BY ILRSWPDR OR ILRSRT OR 
RESTARTED BY DASD ERP FOR 
RETRIES. IF THE I/O IS 
UNSUCCESSFUL OR RESTARTED BY 
DASD ERP, ILRCMPDI RETURNS TO 
IOS IMMEDIATELY. IF FIRST ENTRY 
TO ILRCMPDI (DIE EXIT) , IOSDIESE 
FLAG IS OFF. 



THE STATUS BITS IN THE CSW 
STORED IN THE IOSB ARE 
TESTED. IF ANY BITS ARE ON 
OTHER THAN CHANNEL END, 
DEVICE END, OR CONTROL UNIT 
END, THE I/O WAS NOT 
SUCCESSFUL. IN THIS CASE OR 
IF IOSERR (RESTARTED BY DASD 
ERP) IS ON, THE DIE RETURNS 
TO MAINLINE IOS TO HAVE THE 
POST STATUS DRIVER APPENDAGES 
PROCESS THIS I/O COMPLETION. 



THE FREE PCCWS/SCCWS WILL BE 
RETURNED TO THE APPROPRIATE 
QUEUE. 



E. THE RETURN ADDRESS IS SET TO 
R14+8 TO CAUSE SECOND ENTRY 
TO ILRCMPDI. 



F. THE TOD WILL HAVE BEEN STORED 
UPON ENTRY TO ILRCMPDI. IF 
ILRSRT* S TOD IS NON-ZERO, A 
NEW BURST TIME WILL BE 
CALCULATED. 



lutiviciofi urvj nxuu D£> uh E&TRY 

IS FOR CLEAN UP OF RESOURCES. 



A. THE IORB IS MADE AVAILABLE. 



25.8.4 
25.8.6 

25.8.6 



THE APPROPRIATE I/O DRIVER IS 
SCHEDULED - ILRPTM OR 
ILRSWPDR. 



Diagram 2S.8.1 ILRCMPDI (Part 1 of 1) 
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ILRCMPAE HANDLES THE 
TEMPORARY AND PERMANENT 
I/O ERRORS. 



IF TEMPORARY ERROR, RETURN 
TO POST STATUS FOR ENTRY 
TO DASD ERROR RECOVERY 
PROCEDURE . 



03 IF A PACK ERROR: 



ALREADY MARKED. 



04 IF SLOT ERROR: 



B. RECHAIN THE REMAINING 
REQUESTS . 

[oTI RETURN ANY FREE 

1 1 PCCWS/SCCWS TO APPROPRIATE 

QUEUE. 



I 06 I RETURN ANY PROCESSED AIAS 
1 1 TO PAGE COMPLETION. 



RETURN TO IOS 




ILRCMPAE IS ABNORMAL END 
APPENDAGE FOR ASM. IECVPST (POST 
STATUS) GIVEN CONTROL VIA 
ILRCMPDI (UPON UNSUCCESSFUL I/O 
COMPLETION) CALLS ILRCMPAE TO 
HANDLE THE CODES THAT ARE NOT 
v'art awn wrvr v'71? 1 THE CODES 



A TEMPORARY ERROR HAS A CODE OF 
X*7X* AND WILL BE RETURNED TO 
POST STATUS FOR A CALL TO DASD 
ERP TO INTERPRET AND RETRY 
ERROR. 



A PACK ERROR IS A CODE OF X'51\ 
X*6D T , OR A X T 41* CODE WITH 
SPECIFIC CHANNEL ERRORS OR A 
TOTAL OF 176 I/O ERRORS ON THE 
PACK. 



A. THE PARTE/SARTE IS MARKED AS 
UNUSEABLE AND THE APPROPRIATE 
ACTION IS TAKEN BY ILRMSG00 
VIA BADPACK IF THE SYSTEM 
MUST BE TERMINATED. 



ALL" PCCWS/SCCWS WILL BE 
MARKED AS ERRORS. 



A SLOT ERROR, ANY OTHER IOSCOD 
CODE GIVEN TO ILRCMPAE: 



A. THE PCCW/SCCW AIA IN ERROR IS 
SO MARKED. 



B. THE REMAINING PCCWS/SCCWS 
WILL BE RECHAINED AND THE 
RETURN ADDRESS SET SO THAT 
POST STATUS WILL ISSUE A 
START IO. 



ALL FREED PCCWS/SCCWS WILL BE 
RETURNED TO THE APPROPRIATE 
QUEUE. 



BADSLOT 
RECHAIN 



25.8.7 
25.8.5 



06 ANY PROCESSED AIAS WILL BE 

1 ' RETURNED TO PAGE COMPLETION TO 

COMPLETE PROCESSING FOR THE 
REQUESTS . 



Diagram 25.8.2 ILRCMPAE (Part 1 of 1) 
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1 01 I IF I/O IS NOT SUCCESSFUL, 
1 1 RETURN. 



Output 



REMOVE I/O REQUESTS 
FROM IOSB-IORB. 



B. RETURN FREE PCCWS/SCCWS 
TO AVAILABLE QUEUES. 



D. RETURN TO POST STATUS. 




THIS IS NORMAL END APPENDAGE FOR 
ASM. THE IOSCOD WILL CONTAIN 
X T 7F' . SINCE THE FIRST ENTRY TO 
DIE HAS ALREADY HANDLED ALL THE 
INITIALLY SUCCESSFUL I/O, ONLY 
THE UNEXPECTED T NORMAL' 
SITUATIONS REMAIN. UNIT 
EXCEPTION OR WRONG LENGTH RECORD 
WITH IOSEX BIT ON - EITHER 
SITUATION IS CONSIDERED AN ERROR 
AND SENT TO DASD ERP VIA 
IECVPST. 



02 NORMAL END APPENDAGE ALSO 

1 1 HANDLES SUCCESSFUL I/O FROM DASD 

ERP RETRIES. 



A. ALL PCCWS/SCCWS ARE REMOVED. 

B. THE FREE PCCWS/SCCWS ARE 
RETURNED TO THE APPROPRIATE 
QUEUE. 



D. RETURN TO POST STATUS. 



PROCCWS 
POSTCMP 



25.8.4 
25.8.6 



Ref 



Diagram 25.8.3 ILRCMPNE (Part 1 of 1) 
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01 REMOVE ALL PCCWS/SCCWS 

1 1 UNTIL PCCWPTR/ SCCWPTR 

EQUALS IORERR. 



02 QUEUE AIAS ON INTERNAL 
I 1 QUEUE TO BE PASSED TO PAGE- 
COMPLETION. 



£F^ 



m s 



03 QUEUE PCCW/SCCW ON 
INTERNAL QUEUE TO B_ 
RETURNED TO THE AVAILABLE 



AIA 


AIA 


1 H'l 1 






PCCW 


PCCW 


1 H'l 1 





(£D 



IORERR IS THE ADDRESS OF THE 
PCCW/SCCW IN ERROR. FOLLOW THE 
CHAIN OF PCCWS/SCCWS. AS LONG AS 
THE PCCWPTR/SCCWPTR DOES NOT 
EQUAL IORERR THE PCCW/SCCW WILL 
BE DECHAINED FROM THE IORB. 



02 ALL OF THE AIAS ARE CHAINED 

I 1 TOGETHER AND PASSED TO PAGE 

COMPLETION ON ONE CALL. 



ALL OF THE PCCWS/SCCWS WILL BE 
CHAINED TOGETHER ON AN INTERNAL 

SUEUE AS THEY ARE FREED. THEY 
ILL THEN BE PUT BACK ON THE 
AVAILABLE QUEUE WITH ONE COMPARE 
AND SWAP (CS) . 



Diagram 25.8.4 PROCCCWS (Part 1 of 1) 
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Processing 



Output 



1JT 



FROM ILRCMPAE 



u 



I 01 | REINITIALIZE IORB . 
| 02 | REINITIALIZE IOSB. 



03 COUNT NUMBER OF 

1 1 PCCWS/SCCWS AND UPDATE 

COUNT IN IORB. 



IORRQSZ 



POINT THE IORB TO THE FIRST 
PCCW/SCCW. ZERO ILRSRT'S TOD 
(TIME OF DAY) IN THE IORB SINCE 
SERVICE BURST RECALCULATION WILL 
NOT BE DONE BASED ON A PARTIAL 
SERVICE BURST OF I/O REQUESTS. 



RESET THE FOLLOWING IOSB FIELDS 
RELATIVE TO THE FIRST PCCW/SCCW: 
IOSVST, IOSRST, IOSSEEK, 



iut}vg x f J. 

IOSSEEKA. 



COUNT NUMBER OF PCCW/SCCWS AND 
PUT COUNT IN IORRQSZ. 



Diagram 25.8.5 RECHAIN (Part 1 of 1) 
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Output 



ir*i 
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=Jr 



im 



01 ENTRY IS FROM ILRCMPDI , 
' 1 ILRCMPAE, OR ABNTERM. 



02 DETERMINE IF THERE ARE 

1 ' PCCWS/SCCWS TO RETURN 1 

THE AVAILABLE QUEUE. 



| 03 | IF PCCWS^ RETURN CHAIN TO 



ASMVT QUEUE. 

IF SCCWS. R 
SART QUEUE. 



| 04 | IF_ SCCWS, _RETURN CHAIN TO 



JP 



05 CALL PAGE COMPLETION TO 

1 ' COMPLETE PROCESSING FOR 

THESE AIAS. 



<^> 



ASM ROUTINE 



06 RETURN TO CALLER . 



TO CALLER 



ASMVT 










ASMPCCWQ 




SART 










SARSCCWQ 











FoTl POSTCMP MAKES PCCW/SCCW 

1 ' AVAILABLE AND CALLS ILRPAGCM TO 

HANDLE AIAS. 



CHECK INTERNAL QUEUE TO SEE IF 
ANY PCCWS/ SCCWS HAVE BEEN 
FREED. 



ALL SCCWS WILL BE CHAINED FROM 
THE SART. ONLY ONE KIND OF CCW 
BLOCK IS PROCESSED AT ANY ONE 
INVOCATION. 



Diagram 25.8.6 POSTCMP (Part 1 of 1) 
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Processing 



Output 



FROM ILRCMPAE 



:n: 



to 



01 MARK EACH AIA IN CHAIN AS 
1 1 I/O ERROR. 



02 PUT PCCW/SCCW ON INTERNAL 
1 1 QUEUE. 



| 03 | PUT AIA ON INTERNAL QUEUE. 



04 FOR SLOT ERRORS FOR EACH 
1 ■ PCCW/SCCW: 



A. ADD 1 TO PARTE ERROR 
SLOT COUNT. 



TO ILRCMPAE 



AIA 












AIAPRIER 


AIASECER 










ASMVT 


PARTE 










ASMERRS 


PAREIOCT 

















IF THE AIA IS FOR THE DUPLEX 
DATA SET, MARK AIA AS A 
SECONDARY ERROR. OTHERWISE MARK 
IT AS A PRIMARY ERROR. 



FREE PCCW/SCCW WILL BE PUT ON 
INTERNAL QUEUE. 



AIA'S WILL BE PUT ON INTERNAL 
QUEUE TO BE RETURNED TO PAGE 
COMPLETION. 



04 IF THE ERROR IS AN I/O ERROR, 

1 1 THE ERROR SLOT COUNTS MUST BE 

UPDATED. 



THE PARTE ERROR COUNT KEEPS 
TRACK OF THE NUMBER OF I/O 
ERRORS RECEIVED FOR THIS DATA 
SET. WHEN 176 ERRORS ARE 
RECEIVED, THE PACK IS NO 
LONGER CONSIDERED USEABLE. 



THE ASMVT ERROR COUNT IS A 
TOTAL COUNT FOR ALL LOCAL 
PAGE DATA SETS. 



THE LSID WILL BE RECORDED IN 
A SQA BUFFER. 



Diagram 25.8.7 BADSLOT (Part 1 of 1) 
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Input 



Processing 



Output 



FROM BADSLOT 

(ILRCMPAE 

SUBROUTINE) 



u 



DETERMINE IF ERROR RECORD 
BUFFER HAS BEEN OBTAINED 
PREVIOUSLY. IF NOT, 



A. OBTAIN SALLOC LOCK. 



B. BRANCH ENTER GETMAIN 
FOR CONDITIONAL SQA 
GETMAIN. 

C. RELEASE SALLOC LOCK. 



02 FIND NEXT AVAILABLE ENTRY. 



03 RECORD LSID FOR ERROR AIA. 



^> 



TO CALLER 



ASMVT 


BUFFER 






J"*" 




ASMEREC 


LSID 















01 A BUFFER FROM SQA IS USED TO 

1 ' RECORD THE LSID FOR ERROR SLOTS. 

THIS BUFFER IS NOT OBTAINED 
UNTIL THE FIRST ERROR IS 
ENCOUNTERED. THE POINTER IN THE 
ASMVT IS INITIALIZED TO ZERO AND 
SET TO THE ADDRESS OF THE BUFFER 
ONCE IT IS OBTAINED. 



RECORD THE THREE BYTE LSID IN 
THE NEXT AVAILABLE BUFFER ENTRY. 
IF RECORDING AN ERROR ON A SWAP 
DATA SET, TURN ON THE HIGH ORDER 
BIT OF THE HIGH ORDER BYTE. 



Diagram 25.8.8 RECERR (Part 1 of 1) 
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Output 



J 



FROM. ILRCMP 



to 



01 SET AIAIORTY FLAG IN EACH 

1 1 AIA AND PUT AIA ON 

INTERNAL QUEUE. 



02 PUT PCCW/SCCWS ON THE 
1 ■ INTERNAL QUEUE. 



03 WHEN THE ENTIRE STRING OF 

1 1 PCCW/SCCWS IS COMPLETE, 

RETURN AIAS TO PAGE 
COMPLETION AND RETURN 
PCCW/SCCWS TO APPROPRIATE 
QUEUE . 




ED 



THE AIAIORTY FLAG INDICATES TO 
PAGE COMPLETION TO REDRIVE THE 
REQUEST. 



AN INTERNAL QUEUE OF PCCW/SCCWS 
IS USED TO FREE THE PCCW/SCCWS. 



CALL POSTCMP TO RETURN 
PCCW/SCCWS TO APPROPRIATE QUEUE 
AND TO CALL ILRPAGCM TO RETURN 
STRING OF AIAS. 



Diagram 25.8.9 ABNTERM (Part 1 of 1) 
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Processing 



FROM ILRCMPAE 




Output 



BADPACK: 
|0l| OBTAIN SALLOC LOCK. 



02 MARK DATA SET BAD. 



03 SET UP FOR MESSAGE TO BE 

I 1 ISSUED AND/OR SYSTEM 

TERMINATED. 



CO 



ASM ROUTINE 



I 04 I IF RECEIVE CONTROL BACK, 
1 ' FREE SALLOC AND CONTINUE. 



TO ILRCMPAE 



PARTE/SRE 



ED 



SALLOC LOCK IS OBTAINED TO 
SERIALIZE COUNTS THAT HAVE TO BE 
MANIPULATED AND TERMINATION IF 
IT BECOMES NECESSARY. 



I 02 I INDICATE BAD PAGE/SWAP SPACE IN 
I 1 PARTE/ SARTE. 



SET UP MESSAGE PARAMETER LIST 
WITH PAGE/SWAP INDICATOR AND 
PARTE/SARTE ADDRESS. ZERO 
MESSAGE NUMBER FIELD INDICATING 
ILRMSGOO WILL DETERMINE 
APPROPRIATE SYSTEM ACTION. CALL 
ILRMSGOO TO ISSUE MESSAGE AND/OR 
TERMINATE SYSTEM. 



GEO 



Label 



Diagram 25.8.10 BADPACK (Part 1 of 1) 
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Input 



Processing 



Output 



| REG 1 



PARM LIST 



n 






CVTASMVT r-+ 



01 IF MESSAGE NUMBER IS NOT 
1 ' PROVIDED, PROCEED TO STEP 



I 02 I IF MESSAGE NUMBER IS 8, 
1 ■ TERMINATE THE SYSTEM. 



OTHERWISE, WRITE THE 
REQUESTED MESSAGE TO THE 
OPERATOR AND PROCEED TO 
STEP 9. 



IF THE DESIGNATED 
PARTE/SARTE HAS BEEN 
PREVIOUSLY PROCESSED, 
PROCEED TO STEP 9. 



IF THE UNUSABLE DATA SET 
IS A SWAP DATA SET, WRITE 
MESSAGE 9 TO THE OPERATOR. 



06 IF THE UNUSABLE DATA SET 

1 ' IS PLPA OR COMMON AND THE 

DUPLEX DATA SET IS NOT 
AVAILABLE, TERMINATE THE 
SYSTEM. OTHERWISE, SET UP 
FOR PROCESSING THE DUPLEX 
DATA SET ONLY. 







SART 






SARSETCT 




SREAVLSL 








ASMVT 


PART 




ASMNOCWQ 








PAREWTQE 

















02 



THE CALLER OF ASM MESSAGE 
ROUTINE (ILRMSG00) IS ONE OF THE 
FOLLOWING ROUTINES: ILRCMP . 
ILRCMP01, ILRSRT01, ILRSWP01, 
ILRPTM. THE SALLOC IS HELD UPON 
ENTRY. IF THE MESSAGE NUMBER HAS 
NOT BEEN SUPPLIED BY THE CALLER, 
PROCEED TO STEP 4 IN ORDER TO 
DETERMINE WHICH MESSAGE SHOULD 
BE WRITTEN. THE MESSAGE NUMBER 
IS NOT SUPPLIED BY ILRCMP, 
ILRSRT01. ILRCMP01, AND ILRSWP01 
WHEN A PAGE OR SWAP DATA SET HAS 
BECOME UNUSABLE. 



IF THE MESSAGE NUMBER IS 8. CAI 
THE SUBROUTINE THAT TERMINATES 
THE SYSTEM. 



CALL THE SUBROUTINE THAT BUILDS 
THE REQUESTED MESSAGE AND WRITES 
IT TO THE OPERATOR. THEN PROCEED 
TO STEP 9. 



IF THE DATA SET IS ALREADY 
MARKED AS NOT USABLE 
(PARENUSE/SRENUSE IS ON AND 
PARBDSBD/SREDSBD IS ON), A 
MESSAGE HAS ALREADY BEEN WRITTEN 
ABOUT THIS DATA SET. ALSO, IF 
NEITHER FLAG IS ON, NO FURTHER 
PROCESSING IS DONE. HENCE, 
PROCEED TO STEP 9. 



IP THE DATA SET THAT HAS BECOME 
UNUSABLE IS A SWAP SET. SET THE 
MESSAGE NUMBER TO 9. ALSO 
DECREMENT THE TOTAL NUMBER OF 
AVAILABLE SWAP SETS iSARSETCTJ 
BY THE AVAILABLE SWAP SET COUNT 
FOR THIS ENTRY (SREAVLSL) . ZERO 
THE AVAILABLE SNAP SET COUNT FOR 
"" UNUSABLE SNAP DATA SET 

BAVLSL). CALL THE SUBROUTINE 

BUILD MESSAGE 9 kt~ " 

TO THE OPERATOR. 



AND WRITE IT 



COtMOH. 



SABLE DATA SET IS PLPA OR 



IF THE DUPLEX DATA SET IS NOT 
AVAILABLE (ASMDUPLX ■= '0 T B) , 
CALL THE SUBROUTINE TO 
TERMINATE THE SYSTEM. 



IF THE DUPLEX DATA SET IS 
AVAILABLE, CLEARWTQ IS CALLED 
TO EMPTY THE APPROPRIATE PART 
WRITE QUEUE, FREE THE IOES ON 
THE QUEUE, AND SCHEDULE SRB 
FOR ILRPTM TO BEGIN 
PROCESSING AGAINST THE DUPLEX 
DATA SET. THE ASMVT FLAG 



SUBROUTINE BUILDS 
MESSAGES 9 AND 1C 



AND WRITES 



Routine Label 



CLEARWTQ 
WRITEMSG 



25.9.4 
25.9.3 



Diagram 25.9 1LKMSGOO (Part 1 of 2) 
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Input 



Processing 





, 




1 


|CVTASMVT 




•"*■ 






ASMPLPAF 




ASMCOMMF 















Ur 



ASMPART i-* 



Output 



IF THE UNUSABLE DATA SET 
IS THE DUPLEX PAGE DATA 
SET, THEN TERMINATE THE 
SYSTEM IF EITHER PLPA AND 
COMMON PAGE DATA SETS ARE 
UNUSABLE OR IF BOTH ARE 
FULL. OTHERWISE. WRITE 
MESSAGE 7 TO THE OPERATOR. 



xo n iAA.nL rime unin am.. - 
THEN TERMINATE THE SYSTEM 
IF IT IS THE LAST 
AVAILABLE LOCAL PAGE DATA 
SET. OTHERWISE, WRITE 
MESSAGE 9 TO THE OPERATOR. 



09 RETURN TO CALLER. 



=> 



±> 



TO CALLER 



ASMVT 


PART 










ASMBKSLT 


PARTLCNT 















IF THE DATA SET THAT HAS BECOME 
UNUSABLE IS THE DUPLEX DATA SET, 
THEN CALL THE SUBROUTINE TO 
TERMINATE THE SYSTEM IF 
PLPA/COMMQN PAGE DATA SET IS 
UNUSABLE Tl.E. EITHER THE 
PAREDSBD FLAG OR THE PARENUSE 
FLAG IS ON) OR IF BOTH PLPA AND 
COMMON PAGE DATA SETS ARE FULL 
(I.E. BOTH ASMPLPAF AND ASMCOMMF 
ARE ONT. OTHERWISE. SET THE 
MESSAGE NUMBER TO 7. TURN OFF 
THE DUPLEX OPTION FLAG 
(ASMDUPLX) AND TURN ON THE 
TJPLEX SUSPENDED FLAG 



Us 

DUF 



TO THE OPERATOR. 



08 IF THE DATA SET THAT HAS BECOME 

1 ' UNUSABLE IS A LOCAL PAGE DATA 

SET AND IT IS THE LAST AVAILABLE 



THE SYSTEM IS CALLED. IF IT IS 
NOT THE LAST AVAILABLE LOCAL 
DATA SET, THEN SET MESSAGE 
NUMBER TO 9. DECREMENT THE 
UNRESERVED AVAILABLE LOCAL SLOT 
COUNT (ASMBKSLT) BY THE NUMBER 
OF SLOTS MADE AVAILABLE BY THIS 
DATA SET (PARESLTA) . DECREMENT 
THE LOCAL PAGE DATA SET COUNT 
IPARTLCNT) BY ONE. CALL THE 
SUBROUTINE TO BUILD MESSAGE 9 
AND WRITE IT TO THE OPERATOR. 



09 RETURN TO CALLER OF ILRMSG00. 



TERMSYS 
WRITEMSG 



TERMSYS 
WRITEMSG 



25.9.2 
25.9.3 



25.9.2 
25.9.3 



Label 



Ref 



Diagram 25.9 ILRMSG00 (Part 2 of 2) 
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Input 



Processing 



Output 



FROM ILRTMIOO 



fc> 





, 






|CVTASMVT 






' * 






ASMPLPAF 




ASMCOMMF 




ASMPLPAS 















ILRMSGSP, AN ENTRY OF 
ILRMSGOO, IS CALLED BY 
ILRTMIOO TO ISSUE ANY 
MESSAGES THAT COULD NOT BE 
ISSUED DURING NIP NUCLEUS 
INITIALIZATION PROCESS. 



TEST WHETHER ANY MESSAGE 
MUST BE ISSUED. IF NOT, 
PROCEED TO STEP 7. 



OBTAIN SALLOC LOCK TO 
SERIALIZE ASM MESSAGE 
BUFFER . 



TEST WHETHER PLPA AND/OR 
COMMON HAVE BECOME FULL 
AND PUT OUT THE 
APPROPRIATE MESSAGE (S) . 



TEST WHETHER PLPA AND/OR 
COMMON ARE UNUSABLE AND 
PUT OUT THE APPROPRIATE 
MESSAGE. 



TEST WHETHER THE DUPLEX 
DATA SET HAS BECOME FULL 
OR UNUSABLE AND PUT OUT 
THE APPROPRIATE MESSAGE. 



H3 



RETURN TO CALLER. 



TO ILRTMIOO 



Notes 


Routine 


Label 


Ref 


Notes 


Routine 


Label 


Ref 


[oT| MESSAGES ISSUED BY ILRMSGOO 

1 1 DURING NIP ARE NEVER RECEIVED BY 

THE OPERATOR. ILRTMIOO, WHICH IS 
GIVEN CONTROL AFTER NIP, CALLS 
ILRMSGSP TO DETERMINE AND 
RE- ISSUE THESE MESSAGES. 








MESSAGE 7 AND WRITE IT TO THE 
OPERATOR. 

|07| RETURN TO CALLER. 








1 02 1 TO TEST WHETHER ANY MESSAGES 

1 ' MUST BE ISSUED, CHECK THE 

FOLLOWING BITS: ASMPLPAF, 
ASMCOMMF, ASMNODPX, THE PAREDSBD 
AND PARENUSE FLAGS OF PLPA PARTE 
AND COMMON PARTE. IF NONE OF 
THESE BITS ARE ON, NO MESSAGE 
MUST BE ISSUED, SO PROCEED TO 
STEP 7. 
















1 03 f IF ANY MESSAGES MUST BE WRITTEN, 

1 1 THE SALLOC MUST BE OBTAINED TO 

SERIALIZE ASM T S MESSAGE BUFFER. 
















|04| IF PLPA IS FULL (ASMPLPAF) AND 

1 • SPILLED TO COMMON (ASMPLPAS) , 

CALL THE SUBROUTINE TO BUILD 
MESSAGE 5 AND WRITE IT TO THE 
OPERATOR. IF COMMON IS FULL 
{ASMCOMMF) , THEN CALL THE 
SUBROUTINE TO BUILD MESSAGE 6 
AND WRITE IT TO THE OPERATOR. IF 
BOTH PLPA AND COMMON ARE FULL, 
THEN CALL THE SUBROUTINE TO 
BUILD MESSAGE 10 AND WRITE IT TO 
THE OPERATOR. MESSAGE 10 WILL 
REFER TO COMMON IF PLPA SPILLED 
TO COMMON. OTHERWISE, IT WILL 
REFER TO PLPA. 




WRITEMSG 
WRITEMSG 
WRITEMSG 


25.9.3 










lOSl I* EITHER PLPA OR COMMON ARE 

I 1 UNUSABLE (PAREDSBD OR PARENUSE 

IS ONETT CALL THE SUBROUTINE TO 
BUILD MESSAGE 9 AND WRITE IT TO 
THE OPERATOR. CALL SUBROUTINE 
AGAIN TO BUILD MESSAGE 10 AND 
WRITE IT TO THE OPERATOR. 




WRITEMSG 
WRITEMSG 


25.9.3 










f06| IF THE DUPLEX DATA SET HAS 

1 1 BECOME FULL OR NOT USABLE 

TPAREDSBD OR PARENUSE IS ON), 
CALL THE SUBROUTINE TO BUILD 




WRITEMSG 


25.9.3 
















JU-— 











Diagram 25.9.1 ILRMSGSP (Part 1 of 1) 
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Input 



| REG 1 



PARM LIST 



FROM: 

ILRMSG00, 

ILRMSGSP 



u 



Processing 

TERMSYS : 

I 1 I ESTABLISH RECOVERY FOR 
1 ' TERMINATION ROUTINE. 



02 BUILD TERMINATION MESSAGE 

1 ' IN ASM T S TERMINATION 

BUFFER . 



| 04 | TERMINATE THE SYSTEM. 



Output 



TO IGFPTERM 







JMSGTERM | J 


TERMMSG 



















|msgterm | j 






TERMLRB 











03 



RECOVERY IS ESTABLISHED (SETFRR) 
FOR THE TERMINATION ROUTINE TO 
GIVE ASM A SECOND CHANCE WHEN 
THE SYSTEM MUST BE TERMINATED. 
THE RECOVERY ROUTINE (ILRMSG01) 
WILL NOT ATTEMPT TO USE MCH 
^MACHINE CHECK HANDLERl TO 
TERMINATE THE SYSTEM, BUT WILL 
SIMPLY DO A LPSW (LOAD PSW) . 



THE BASE TERMINATION MESSAGE IS 
PLACED IN THE TERMINATION 
BUFFER. THE VARIABLE INFORMATION 
IS THEN FILLED IN. THIS VARIABLE 
INFORMATION INCLUDES THE DATA 
SET TYPE YPLPA, COMMON, ETC.) 
AND THE VOLID OF THE DATA SET. 



THE SYSTEM TERMINATION LOGREC 
BUFFER IS INITIALIZED WITH ONE 
OF ASM'S WAIT STATE CODES. THE 
WAIT STATE IS X T 02E' IF THE DSBD 
FLAG OR THE NUSE FLAG OF THE 
PARTE IS SET. OTHERWISE, THE 
WAIT STATE IS X f 03C . THE 
PARAMETER LIST IS ALSO 
INITIALIZED WITH THE REAL 
ADDRESS OF THE MESSAGE AND THE 
REAL ADDRESS OF THE LRB (LOGREC 
BUFFER) . 



THE MACHINE CHECK HANDLER 
TERMINATION ROUTINE IS BRANCH 
ENTERED TO TERMINATE THE SYSTEM. 



Diagram 25.9.2 TERMSYS (Part 1 of 1) 
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Input 



Processing 



Output 



I 



PARM LIST 



fe 



WRITEMSG: 



| 01 I LOCATE NEXT AVAILABLE 

I ' MFSSAGF. RIIPPRR 



02 FILL BUFFER WITH MESSAGE: 



■J^> 



B. FILL IN VARIABLE 
INFORMATION WHEN 
NECESSARY. 

I 03 I USE THE RECORDING FACILITY 

1 ■ TO WRITE THE MESSAGE TO 

THE OPERATOR. 



CD 



RECORDING FACILITY 



04 RETURN TO CALLER. 



TO CALLER 



ASM'S MESSAGE BUFFER AREA IS 
POINTED TO BY ASMMSGBF. THE 
FIRST WORD OF THE HEADER IS THE 
POINTER TO THE CURRENT BUFFER 
(I.E. THE BUFFER LAST USED). 
THIS POINTER IS UPDATED TO POINT 
TO THE NEXT AVAILABLE BUFFER. IF 
THE CURRENT BUFFER HAPPENS TO BE 
THE LAST BUFFER THEN THE NEXT 
AVAILABLE BUFFER IS THE FIRST 
BUFFER. THE NEW CURRENT BUFFER 
IS THE ONE TO BE USED. 



COPY THE BASE MESSAGE INTO 
THE BUFFER. THIS IS ALL THAT 
NEEDS TO BE DONE FOR MESSAGES 
5 AND 6 SINCE THEY ARE 
CONSTANT. 



FOR MESSAGES 7, 9 AND 10, 
FILL IN THE VARIABLE 
INFORMATION SUCH AS THE DATA 
SET TYPE (PLPA, COMMON. LOCAL 
OR SWAP) , THE VOLUME ID OF 
THE DATA SET, AND WHETHER THE 
DATA SET IS FULL OR BAD (THE 
DATA SET IS BAD IF EITHER THE 
DSBD FLAG OR THE NUSE FLAG IS 
ON, OTHERWISE THE DATA SET IS 
FULL) . 



USE THE WTO OPTION OF RECORD TO 
WRITE THE MESSAGE TO THE 
OPERATOR. RETURN TO CALLER. 



Diagram 25.9.3 WRITEMSG (Part 1 of \) 
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Input 



Processing 



Output 



J 



PAREWTQE 



fc> 



CLEARWTQ: 



01 OBTAIN ASM CLASS LOCK FOR 
1 1 PART WRITE QUEUES. 



02 CLEAR THE PART WRITE QUEUE 

1 ' ASSOCIATED WITH THE PART 

ENTRY PROVIDED. 



04 MARK THE AIA. 



05 IF NECESSARY. PLACE THE 

1 1 AIA ON THE PART AIA ERRC 

QUEUE. 



PART 




AIA 




J 






PARTAIAE 


AIASECER 





AIANXAIA 




AIALSID 







PAREWTQE 



[oT] 



THE ASM CLASS LOCK IS OBTAINED 
IN ORDER TO SERIALIZE THE PART 
WRITE QUEUES. 



SAVE THE POINTER TO THE FIRST 
IOE ON THE PART WRITE QUEUE 
ASSOCIATED WITH THE PART ENTRY 
PROVIDED. ZERO THE FORWARD AND 
BACKWARD POINTERS OF THE PART 
WRITE QUEUE. 



OBTAIN A POINTER TO THE AIA FROM 
THE IOE. IF THE PART ENTRY 
PROVIDED IS THE PART ENTRY FOR 
PLPA OR COMMON, THEN ZERO THE 
LSID FIELD IN THE AIA. IF THE 
PART ENTRY IS THE DUPLEX PART 
ENTRY, THEN TURN ON THE 
SECONDARY WRITE ERROR FLAG IN 
THE AIA. 



IF THE AIA COUNT OF OUTSTANDING 
WRITE OPERATIONS FOR A DUPLEXED 
WRITE OPERATION IS EQUAL TO TWO 
(INDICATING THIS IS THE FIRST 
REQUEST RETURNING FROM IOS) , 
THEN DECREMENT THAT COUNT BY 
ONE. OTHERWISE, USE COMPARE AND 
SWAP LOGIC TO PLAGE THAT AIA ON 
THE PART AIA ERROR QUEUE TO BE 
RETURNED TO RSM. 



Diagram 25.9.4. CLEARWTQ (Part 1 of 2) 
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Processing 



Output 



07 IF THERE ARE MORE IOE'S, 

1 1 GO BACK TO STEP 3 AND 

REPEAT OPERATION. 



08 RELEASE ASM CLASS LOCK. 



09 SCHEDULE ILRPTM IF NOT 
I ■ ALREADY SCHEDULED. 



10 RETURN TO CALLER. 



IF THERE ARE MORE IOE'S TO BE 
FREED, THEN GO BACK TO STEP 3 
AND REPEAT THE PROCESS FOR THE 
NEXT IOE. 



THE ASM CLASS LOCK USED TO 
SERIALIZE THE PART WRITE QUEUES 
IS RELEASED. 



IF ILRPTM IS NOT ALREADY 
SCHEDULED, THEN SCHEDULE IT. 



10 RETURN TO ILRMSGOO. 



Diagram 25.9.4 CLEARWTQ (Part 2 of 2) 
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VIO Control 

VIO Control coordinates and synchronizes all ASM 
processing required to support VIO data sets. ASM 
treats each VIO data set as a Logical Group (LG) 
of 4096-byte pages. The Virtual Block Processor 
(VBP) requests assignment of a LG each time a new 
VIO data set is created. ASM assigns a four-byte 
Logical Group Number (LGN) for each logical 
group requested by VBP. ASM provides a journaling 
facility for logical groups that allows VBP to direct 
saving the current contents of a VIO data set, for 
later recovery if necessary. For each journaled VIO 
data set ASM assigns a unique value called the 'S' 
symbol. All requests for services on a VIO data 
must be made using either the LGN or the eight 
byte 's' symbol assigned to the data set. Each page 
within a logical group is identified by an eight-byte 
Logical Page Identifier (lpid). The lpid consists 
of the LGN followed by a four byte Relative Page 
Number (RPN). The LGN is assigned by ASM, the 
rpn is assigned by VBP. 

The four central control blocks for VIO Control 
processing are the LGVT (Logical Group Vector 
Table), ASMHD (asm Header), LGE (Logical Group 
Entry), and the ASPCT (Auxiliary Storage Page 
Correspondence Table). 

The LGVT resides in SQA and contains a small 
header section plus an eight-byte entry (LGVTE) 
for each LG. The LGVTE contains the address of 
the ASCB for the address space to which LG is 
assigned and a pointer to the LGE for the LG. 

The ASMHD is the focal point of VIO Control 
processing. An ASMHD exists for each active 
address space. It resides in SQA and contains 
paging I/O control information and VIO Control 
information. The VIO Control information includes 
a pointer to the srb used to schedule SRB 
Controller and a queue header for the LGE queue. 

An LGE exists for each LG assigned to the 
address space. The LGEs are allocated from SQA 
and reside on a single-threaded queue based in the 
ASMHD. The LGE controls all processing of a 
logical group. It includes control information for 
the LGE, a process queue containing ACEs (ASM 
Control Elements) and AlAs (ASM I/O Areas) 
representing all work in progress or waiting to be 
executed. The LGE also contains a pointer to the 

ASPCT. 

The ASPCT contains an LSID (Logical Slot 
Identifier) for each VIO data set page written to 
auxiliary storage. The ASPCT also has a header with 
additional control information for the LG. An 
ASPCT exists for each LG and resides in user 



private area storage. For further information about 
the ASPCT, see "Diagnostic Aids" in Volume 7. 
VIO Control consists of four central routines: 

• ILRPOS — Page Operations Starter. 

• ILRGOS — Group Operations Starter. 

• ilrsrbc — srb Controller. 

• ILRVIOCM — VIO Completion. 

VIO Control also includes a special Job 
Termination Resource Manager (ILRJTERM). 

Page Operations Starter 

I/O Control (ILRPAGIO) calls ILRPOS whenever a 
paging request for a VIO page is received from 
RSM. It can also be called by the Transfer Page 
Routine (ILRTRPAG), an entry point in ILRPOS 
entered from RSM. 

VIO Page Requests 

ILRPAGIO sends a chain of AlAs to ILRPOS. These 
AlAs may be for different VIO data sets. ILRPOS 
tests to determine if a paging operation is pending 
or if a group operation is pending or in progress 
for the LGs on which the paging is to be done. If 
there is a group operation pending or in progress, 
the paging request is in error and the error ALA is 
returned to ILRPAGIO. If there is a paging 
operation pending for this LG, ILRPOS queues the 
AIA to the LGE Process Queue for later processing. 

If there is no paging operation pending or group 
operation pending or in progress, ILRPOS locates 
the lsid corresponding to the VIO LPID and queues 
the input AIA to the ASMVT staging queue 
(ASMSTAGQ). The LSID is located by finding the 
Logical-to-Physical Mapping Entry (LPME) in the 
ASPCT via the RPN portion of the LPID. The LPME 
address is put into the AIA. The LPME contains the 
LSID corresponding to the LPID. On a page-out 
operation, ILRPOS frees the LSID in the LPME. On 
a page-in, ILRPOS moves the LSID into the AIA. 

The ILRESTRT entry point of ILRPOS handles 
any VIO paging requests that are queued for later 
processing. The SRB Controller (ILRSRBC) calls 
ilrestrt whenever it finds unstarted paging 
requests on the LGE process queue. 

Transfer Page Requests 

RSM initiates a Transfer Page request by calling the 
ILRTRPAG entry point of ILRPOS. ilrtrpag builds 
an ASM Control Element (ACE) by copying into it 
the information in the ACA (ASM Control Area) 
that RSM passes it. ILRTRPAG then calls the main 
entry point of ILRPOS. If a paging operation is 
pending for the Logical Group the Transfer Page 
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Request is being made against, ILRPOS queues the 
ACE to the LGE Process Queue for later processing. 
If the request can be started immediately, ILRPOS 
calls the ILRTRANS entry point of ILRPOS to 
process the request. 

The ilrtrans entry point of ilrpos handles 
any Transfer Page requests that are queued for 
later processing. The SRB Controller (ilrsrbc, also 
part of vio Control) calls ilrtrans whenever it 
finds unstarted transfer requests on the LGE 
Process Queue. 

Group Operations Starter 

ILRGOS accepts the following group requests from 
VBP: ASSIGN LG, SAVE LG/LGN, ACTIVATE LG, 

and release LG. An ACA is the input parameter 
list. ILRGOS always does an assign operation 
immediately. SAVE, activate, and RELEASE are 
started immediately only if no other operations are 
pending or in progress for the Logical Group. 

ASSIGN LGN 

For an ASSIGN request, ILRGOS assigns a new 
LGN, builds a LGE and an ASPCT, and returns the 
LGN to VBP. 

SAVE, ACTIVATE, and RELEASE 

For these requests ILRGOS moves the input 
information from the AIA into an ACE, and then 
queues the ACE to the LGE Process Queue to 
prevent any other group operation from starting 
until this operation completes. If any group 
operations are in progress or pending, the ACE is 
marked work-pending. Otherwise, ILRGOS calls the 
appropriate group operator (see Section 4, "VIO 
Group Operators") to process the request. 

The Release LG operator (ilrrlg, one of the 
•VIO Group Operators) calls the ILRFRELG entry 
point of ILRGOS to free the LGE and make the 
LGVTE available. For that Logical Group, 
ILRFRELG dequeues the LGE from the asm Header 



Queue, returns the LGVTE to the available queue, 
and frees the LGE. 

SRB Controller 

An SRB scheduled by vio Completion or by 
ILRGOS causes the SRB Controller (ilrsrbc) to be 
dispatched in the address space for which a page or 
group operation is pending. ILRSRBC finds the 
pending work via the LGE queue based in the ASM 
Header (ASMHD), determines which work can be 
started, separates the startable work into group 
operation and page operation chains, and starts the 
work by posting ILRPOS, by calling the appropriate 
group operator, or by calling the ILRTRANS or by 
ilrestrt entries in ilrpos. 

VIO Completion 

I/O Control passes control to VIO Completion 
(ILRVIOCM) whenever a VIO paging operation is 
completed. ILRVIOCM processes one AIA as input, 
dequeues it from the LGE Process Queue, and 
returns it to I/O Control. For a page-out, 
ILRVIOCM stores the newly-assigned LSID in the 
ASPCT. For a page-in, ILRVIOCM sets error flags, if 
necessary. If any more work is pending on the LGE 
Process Queue, ILRVIOCM schedules an SRB for 
ilrsrbc to start the work prior to return to I/O 
Control. 

Job Termination Resource Manager 

The initiator's job termination module (IEFSD166) 
calls the Job Termination Resources Manager 
(ilrjterm) to deactivate any VIO data sets still 
active at job deletion time. ILRJTERM searches each 
LGE process queue for a RELEASE LG ACE. If a 
release ACE is not queued for an LG, ILRJTERM 
obtains one, intializes it, and queues it. ILRJTERM 
then schedules ILRSRBC to start the RELEASE 
operations. 
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Page Operations 

Starter 

(ILRPOS) 



25.10.1 



Restart VIO 

Request 

(ILRESTRT) 



25.10.2 



Transfer Page 

Process 

(ILRTRANS) 



25.10.3 



Transfer Page 

Initiator 

(ILRTRPAG) 



VIO Control 



25.11 



Group Operations 

Starter 

(ILRGOS) 



25.11.1 



Free Logical Group 
Control Blocks 
(ILRFRELG) 



25.13 



VIO Completion 
(ILRVIOCM) 



ISRB 



25.12 



SRB Controller 
(ILRSRBC) 



25.14 



Job Termination 
(ILRJTERM) 



25.x. — Module 

25.x.y. — Entry point in module 25.x. 

Figure 2-59. VIO Control Overview 
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LGEASPCT 



















0r> 



ILRPOS: 
foTl 'entry SETUP 



| 02 | LOCATE LGE RELATED TO 
INPUT ACE/AIA. 

| 03 | IF GROUP OPERATION IS 

QUEUED OR IN PROGRESS FOR 
THE LGE, THE REQUEST 
CANNOT BE PROCESSED. GOTO 
STEP 10 WITH ERROR CODE. 



| 04 | LOCATE LPME 



A. IF ASPCT EXPANSION 
REQUIRED, EXPAND ASPCT 
IMMEDIATELY . 

B. STORE LPME ADDRESS IN 
AI A/ACE. 

| 05 | IF WORK IS PENDING FOR 
LGE, GOTO STEP7. 



7=> 





J ' 




LPME PTR. 


LPME 

















1 01 I PAGE OPERATIONS STARTER (POS) 
RECEIVES CONTROL FROM I/O 
CONTROL, OR FROM THE ILRTRPAG 
SECONDARY ENTRY POINT FOR 
TRANSFER PAGE REQUESTS. INPUT IS 
A SINGLE ACE (ILRTRPAG) OR A 
STRING OF ONE OR MORE AIAS (I/O 
CONTROL) . ItRPOS ATTEMPTS TO 
START ALL OPERATIONS 
IMMEDIATELY. AIAS THAT CAN BE 
STARTED IMMEDIATELY ARE RETURNED 
TO I/O CONTROL. ACE (TRANSFER 
PAGE) IS PROCESSED COMPLETELY IF 
STARTABLE IMMEDIATELY. OTHER 
AIAS AND ACES ARE PUT ON THEIR 
PROCESS QUEUES FOR LATER 
PROCESSING. ASM LOCK OF CURRENT 
ADDRESS SPACE IS OBTAINED. FOR 
RECOVERY, ILRIOFRR RECOVERY 
ROUTINE HANDLES ERRORS OCCURRING 
IN ILRPOS (ALL ENTRIES) . 

| 02 [ THE LGE IS FOUND VIA THE LPID IN 
THE INPUT ACE/AIA. 

| 03 | EITHER OF THESE CONDITIONS WILL 
PREVENT PROCESSING OF THE 
OPERATION. PAGE OPERATIONS ARE 
TREATED AS ERRORS IN THIS CASE 



TO PREVENT INTERLOCK SITUATIONS 
FROM ARISING IF ASPCT EXPANSION 
IS REQUIRED FOR THE LG. 

| 04 | WHILE LOCATING THE LPME VIA THE 
RPN OF THE LPID, THE ASPCT MAY 
REQUIRE EXPANSION. 

A. THE RPN LEADS TO AN LPME THAT 
DOES NOT YET EXIST IN THE 
ASPCT. ASPCT EXPANSION IS 
PERFORMED IMMEDIATELY WHILE 
ALL NECESSARY LOCKS ARE HELD. 
DELAY OF THIS PROCESSING 
WOULD CAUSE A POTENTIAL LOCAL 
LOCK INTERLOCK SITUATION. 

B. ONCE THE RPN LEADS TO AN 
EXISTING LPME, THE LPME 
ADDRESS IS PLACED IN THE 
AIA/ACE FOR USE BY OTHER VIO 
CONTROLLER ROUTINES. 

| 05 | IF WORK IS PENDING FOR THE LGE, 
NEW WORK CANNOT BE STARTED 
BECAUSE IT MAY BE FOR THE SAME 
PAGE FOR WHICH WORK IS PENDING. 



Diagram 25.10 ILRPOS (Part 1 of 2) 
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| 06 | IF ANOTHER OPERATION NOT 
IN PROGRESS FOR LPME. 

A. IF THE ACE HAS NO AIA 
ADDRESS, EXECUTE 
TRPPROC SUBROUTINE, 
THEN GOTO STEP 10. 

B. IF THE ACE HAS AN AIA 
ADDRESS, GOTO STEP 7. 

C. FOR I/O REQUESTS, MOVE 
NECESSARY LSID DATA 
INTO AIA. QUEUE AIA TO 
ASM STAGING QUEUE. 

| 07 | QUEUE AIA OR UNPROCESSED 
ACE TO LGE PROCESS QUEUE. 

| 08 | REPEAT STEPS 4-7 FOR EACH 
AIA IN INPUT CHAIN. 

| 09 | REPEAT STEPS 2-8 IF AIAS 
ON INPUT CHAIN FOR MORE 
THAN ONE LGE. 

I 1 | RETURN ANY ERROR AIA. 



TO CALLER 





J " 




ASMSTAGQ 


AIALSID 















LGE ASPCT 






LGEPROCQ 












LPME 


AIA OR ACE 










J 




LPME PTR. 

















ATA 


AIA OR ACE 






J - * - 




OR PTR 

















AT THIS POINT, LPME IS KNOWN AND 
IS PROCESSED UNLESS THE LPME IS 
ALREADY IN PROGRESS. IN THIS 
CASE, THE AI A/ACE MUST BE QUEUED 
TO THE PROCESS QUEUE TO BE 
HANDLED LATER. 

A. IF THE INPUT IS A SINGLE ACE, 
THE TRANSFER PAGE REQUEST IS 
PROCESSED IMMEDIATELY BY THE 
SUBROUTINE. THE ACE IS FREED. 

B. IF THE TRP ACE HAS AN AIA 
ADDRESS, THE TRANSFER PAGE 
OPERATION CANNOT BE STARTED 
UNTIL I/O REPRESENTED BY THE 
AIA COMPLETES. 

C. FOR PAGING I/O AIAS, MOVE 
NECESSARY DATA FROM LPME TO 
AIA. LSID MOVED FOR PAGE-IN 
REQUESTS, LSID FREED (BY 
ILRFRSL1) AND/OR CLEARED FOR 
PAGE-OUTS. THE LPME PTR IS 
SAVED IN AIA AND AIA QUEUED 
TO ASM STAGING QUEUE TO BE 
PROCESSED BY THE ILRQIOE 
SUBROUTINE OF I/O CONTROL. 



| 07 | ALL AIAS WILL BE QUEUED AND ANY 
UNPROCESSED ACES QUEUED TO 
PROVIDE SYNCHRONIZATION OF ALL 
OPERATIONS FOR LG. 

| 08 | EACH AIA IS PROCESSED 

SEPARATELY. WHEN .A NEW LGID IS 
ENCOUNTERED IN AN LGE, THE WORK 
PENDING FLAG IS SET ON THE 
CURRENT LGE IF ALL AIAS WERE NOT 
QUEUED TO THE STAGING QUEUE. 

| 09 | AIAS MAY BE PASSED FOR MULTIPLE 
LGIDS (LOGICAL GROUPS), BUT ALL 
LSIDS MUST BE IN THE CURRENT 
ADDRESS SPACE. 

|10| ANY AIAS STARTABLE IMMEDIATELY 
HAVE BEEN QUEUED TO THE STAGING 
QUEUE. AIAS NOT QUEUED TO 
STAGING QUEUE WILL BE STARTED 
LATER BY ILRSRBC. IN ERROR 
CONDITIONS, THE AIA/ACE IS 
RETURNED TO THE CALLER. 



Diagram 25.10 ILRPOS (Part 2 of 2) 
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REG 1 ASPCT 






AIA 
ADDRESS 












AIA 


LPME 


LSID 














AIALPMEP 

















FROM ILRSRBC 



fc> 



| 01 | ILRESTRT SECONDARY ENTRY 
POINT TO ILRPOS 

| 02 | OBTAIN SALLOC AND ASM 
LOCKS. 

| 03 | MOVE NECESSARY LSID DATA - 
FROM LPME TO AIA. QUEUE 
AIA TO ASM STAGING QUEUE. 

1 04 1 REPEAT STEP 3 FOR EACH AIA 
IN INPUT STRING. 

| 05 | RELEASE ASM LOCK. 

| 06 | THE ILRQIOE ROUTINE OF I/O 
CONTROL IS CALLED TO 
INITIATE PAGING I/O. 



<T> 



ILRQIOE 



ASM ROUTINE 



j 07 | RELEASE SALLOC LOCK. 



lU 



ASMVT 


AIA 






r* 




ASMSTAGQ 


LSID 



















1 01 I THE RESTART ENTRY POINT OF POS 
RECEIVES CONTROL FROM SRBC 
WHENEVER UNSTARTED I/O REQUESTS 
(AIAS) ARE FOUND ON A PROCESS 
QUEUE. THE PROPER LSID 
INFORMATION IS PLACED IN THE 
AIAS AND THE AIAS ARE QUEUED TO 
THE STAGING QUEUE FOR I/O 
CONTROL TO START THE I/O 
OPERATION. INPUT MAY BE A STRING 
OF ONE OR MORE AIAS. THIS ENTRY 
POINT USES SUBROUTINES COMMON TO 
MAINLINE ILRPOS PROCESSING. 

[ 02 | THE SALLOC LOCK IS REQUIRED TO 
PROVIDE A SAVE AREA IF THE FREE 
SLOT ROUTINE HAS TO BE CALLED. 
IT IS ALSO REQUIRED FOR THE CALL 
TO ILRQIOE. THE ASM CLASS LOCK 
FOR THE CURRENT ADDRESS SPACE IS 
REQUIRED TO SERIALIZE LPME 
PROCESSING. 

1 03 1 THE LPME ADDRESS IN THE AIAS IS 
PROCESSED. LSID IS MOVED INTO 
THE AIA FOR PAGE-IN REQUESTS. 
LSID IS FREED (BY ILRFRSL1 ) 
AND/OR CLEARED FOR PAGE OUTS. 



| 04 | A STRING OF AIAS MAY BE PASSED 

AS INPUT. THEY DO NOT HAVE TO BE 
FOR THE SAME LOGICAL GROUP, BUT 
MUST BE ONLY FOR LOGICAL GROUPS 
IN THE CURRENT ADDRESS SPACE. 

1 05 } THE ASM LOCK IS RELEASED IN 
ORDER THAT THE SALLOC LOCK 
(LOWER IN HIERARCHY) IS THE ONLY 
LOCK HELD AT ENTRY TO ILRQIOE. 
THE ASM LOCK IS NO LONGER NEEDED 
BY THIS ROUTINE. 

1 06 1 THIS ENTRY OF I/O CONTROL 
REQUIRES THE SALLOC LOCK. 

1 07 1 THE SALLOC LOCK IS FREED BEFORE 
RETURNING TO ILRSRBC WHO HAS NO 
FURTHER LOCK REQUIREMENTS. 



ILRQIOE 



Diagram 25.10.1 ILRESTRT (Part 1 of 1) 



Section 2 : Method of Operation 5-207 



VS2.03.807 



Input 



Processing 





FROM ILRSRBC 


ACE ASPCT 1 








J ' 






> 




ACETLPME 
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Output 



ILRTRANS: 

| 01 | ILRTRANS SECONDARY ENTRY 
POINT TO POS (INTERNAL 
SUBROUTINE - TRPPROC) . 

| 02 | DISPOSE OF ANY CURRENT 
LSID IN LPME 

A. IF ASPCT HAS NOT BEEN 
SAVED, FREE SLOT 



CO 



ASM ROUTINE 



B. OTHERWISE, CLEAR LSID 
ONLY 

| 03 | MOVE THE NEW LSID FROM THE- 
ACE TO THE LPME. 



IL 



ASPCT 














LPME 


LSID 











ILRTRANS SUBROUTINE/ENTRY OF 
ILRPOS IS CALLED BOTH INTERNALLY 
BY ILRPOS AND EXTERNALLY BY 
ILRSRBC WHENEVER A TRANSFER PAGE 
OPERATION IS REQUIRED. INPUT IS 
A SINGLE ACE CONTAINING A SOURCE 
LSID AND A TARGET LPME ADDRESS. 

THE INPUT ACE POINTS TO THE LPME 
TO PROCESS. 

A. ANY VALID LSID IN THE LPME IS 
FREED (BY ILRFRSL1 ) IF THE 
ASPCT HAS NOT BEEN SAVED OR 
THE CURRENT LPME HAS ALREADY 
BEEN RELEASED AT LEAST ONCE 
AFTER THE LAST SAVE. 

B. IF THE SLOT IDENTIFIED BY THE 
LSID MUST BE SAVED FOR A 
FUTURE ACTIVATE, THE LSID IS 
SET TO ZERO BUT THE 
ASSOCIATED SLOT IS NOT FREED. 

THIS COMPLETES THE TRANSFER PAGE 
OPERATION. THE LSID MOVED INTO 
THE LPME WAS FORMERLY ASSIGNED 
TO A VIO WINDOW PAGE BY ASM AS 
THE RESULT OF A NON-VIO DIRECTED 



PAGE-OUT OPERATION. 



Diagram 25.10.2 ILRTRANS (Part 1 of 1) 
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FROM IEAVAMSI 




1 01 | ILRTRPAG SECONDARY ENTRY 
POINT TO ILRPOS. 

| 02 | SETFRR FOR RECOVERY AND 

GET AN ACE FROM ACE POOL. 

| 03 | COPY INFORMATION FROM ACA 
TO ACE. 

1 04 1 IF AIA ADDRESS PASSED IN 
ACA, SET SPECIAL FLAGS IN 
AIA AND ACE. 

| 05 | CALL MAINLINE ENTRY POINT 
OF ILRPOS TO GET ACE 
PROCESSED. 

roTI RETURN TO RSM. 



t> 



TO IEAVAMSI 



ACE AIA 






J'l I 


ACEAIAPT 















03 



THIS IS AN INTERNAL ENTRY POINT 
TO ILRPOS USED BY RSM WHEN 
REQUESTING A TRANSFER PAGE 
OPERATION VIA THE ILRCALL MACRO. 
THIS ROUTINE WILL BUILD AN ACE 
AND PASS IT TO MAINLINE ILRPOS 
FOR PROCESSING. 

THE RECOVERY ENVIRONMENT IS 
CREATED FOR ASM VIA A SETFRR 
SINCE THIS IS AN EXTERNAL ENTRY 
TO ASM. THE ACE IS OBTAINED FROM 
THE COMMON ACE POOL, BASED IN 
THE ASMVT. 

THE INFORMATION PASSED IN THE 
ACA IS COPIED TO THE ACE. THE 
ACA IS ONLY A PARAMETER LIST 
OWNED BY RSM THAT MUST BE 
RETURNED ON EXIT EVEN IF THE 
OPERATION HAS NOT COMPLETED. 

IF RSM SUPPLIED A NON-ZERO AIA 
ADDRESS IN THE ACA, A SOURCE 
LSID IS NOT YET AVAILABLE. THE 
SOURCE LSID WILL BE AVAILABLE 
WHEN THE PAGE-OUT OPERATION 
IDENTIFIED BY THE AIA COMPLETES. 



Routine Label 



THEREFORE, THIS AIA MUST BE 
MARKED AS A VIO AIA FOR 
PROCESSING BY VIO COMPLETION. 
THE ACE IS ALSO MARKED TO 
INDICATE THAT IT IS WAITING FOR 
I/O TO COMPLETE. 

MAINLINE ILRPOS CODE IS CALLED, 
PASSING THE ADDRESS OF THE ACE 
TO BE PROCESSED IN THE ATA. THE 
ATA (ASM TRACKING AREA) IS USED 
TO RECORD INFORMATION NEEDED FOR 
RECOVERY. UPON RETURN, IF ERRORS 
OCCURRED, THE ACE IS FREED AND 
STEP 4 BACKED OUT IF EXECUTED. 
IF NO ERRORS OCCURRED, ILRPOS 
MAINLINE HAS DISPOSED OF THE 
ACE. 

NO SPECIAL RETURN INFORMATION IS 
PASSED BACK TO RSM EXCEPT A 
RETURN CODE. 



Diagram 25.10.3 ILRTRPAG (Part 1 of 1) 
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STEPS 2 AND 3 FOR ASSIGN 
LG. GO TO STEP4 FOR OTHER 
REQUESTS . 

TEST TO ASSURE THERE ARE 
ENOUGH RESERVE SLOTS FOR A 
NEW LOGICAL GROUP. IF NOT, 
RETURN. 



A. OBTAIN S ALLOC LOCK. 
ASSIGN AN AVAILABLE 
LGID FROM LGVT. 

B. OBTAIN SPACE FOR A LGE 
AND AN ASPCT. 

C. COPY LGVT IF REQUIRED. 

D. INITIALIZE AND QUEUE 
SRB AND ASPCT, IF 
OBTAINED. INITIALIZE 
THE LGE. RELEASE SALLOC 
LOCK. 

| 03 | ADD THE LGE TO THE ASMHD 
QUEUE AND VALIDATE THE 
LGVTE FOR THE LG. 



RETURN TO VBP 




RETURN TO VBP 





ASMVT 


ASMHD 






ASMLGVT 




ASHVSRBP 




ASMLGEQ 












*•' 




LGVT 


SRB 






■I 




LGVTE 


I 




LGVTE 


J3E 


LGVTE 






\ch 




I 


LGEASPCT 








LGID 


1 






\SPCT 
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THE GROUP OPERATIONS STARTER 
(GOS) ALWAYS RECEIVES CONTROL 
FROM VBP (VIRTUAL BLOCK 
PROCESSOR) VIA AN ILRCALL MACRO 
INSTRUCTION. AN ACA IS THE INPUT 
PARAMETER LIST. GOS EXECUTES ALL 
ASSIGN LG REQUESTS IMMEDIATELY. 
SAVE, ACTIVATE AND RELEASE MAY 
OR MAY NOT BE STARTED 
IMMEDIATELY. FOR ASSIGN AND 
RELEASE, THE LOCAL LOCK IS HELD 
ON ENTRY AND SETFRR IS ISSUED 
FOR RECOVERY. AN ESTAE IS USED 
FOR SAVE AND ACTIVATE REQUESTS 
BECAUSE NO LOCKS ARE HELD AT 
ENTRY. ILRGOS01 (BOTH AN FRR AND 
ESTAE RECOVERY ROUTINE) HANDLES 
ERRORS" OCCURRING IN ILRGOS. 

IF ENOUGH SLOTS ARE NOT 
AVAILABLE, AN ERROR RETURN CODE 
IS PASSED BACK TO VBP. 

A. THE SALLOC LOCK IS NEEDED FOR 
THE SQA GETMAIN. IT ALSO 
SERIALIZES LGVT EXPANSION AND 
SRB CREATION, IF REQUIRED. AN 
LGID IS TAKEN FROM A LGVTE ON 
THE LGVT AVAILABLE QUEUE. IF 



NO LGVTE IS AVAILABLE, THE 
LGVT MUST BE EXPANDED BY 
BEING COPIED INTO A LARGER 
STORAGE AREA. 

B. SQA SPACE IS OBTAINED FOR AN 
LGE, FOR AN SRB THIS IS FIRST 
ASSIGN FOR ADDRESS SPACE, AND 
FOR A LGVT IF REQUIRED IN 
STEP2A. LSQA SPACE IS 

. OBTAINED FOR AN ASPCT. 

C. ANY CODE THAT REFERENCES A 
LGE THRU THE LGVT MUST NOT 
SAVE THE POINTER TO THE 
LGVTE. IF THE LGVT MUST BE 
COPIED TO BE EXPANDED, THE 
POINTER WILL BE CHANGED. 

D. SALLOC IS RELEASED AFTER THE 
CONTROL BLOCKS HAVE BEEN 
BUILT AND QUEUED. IF STEP 5 
IS EXECUTOR OF THESE STEPS, 
THE ASPCT WILL BE OBTAINED BY 
THE GROUP OPERATOR. 

THIS WHOLE OPERATION IS 
SERIALIZED BY THE ASM LOCK FOR 
THE ADDRESS SPACE. 



IEAVGM00 
IEAVGM00 



GLBRANCH 
CRBRANCH 



Diagram 25.11 ILRGOS (Part 1 of 3) 
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| 04 | SAVE, ACTIVATE, RELEASE LG 
REQUESTS. GET AN ACE FROM 
POOL AND OBTAIN ASM LOCK 
FOR THE ADDRESS SPACE. 

{ 05 | FIND EXISTING LGE FOR 

LOGICAL GROUP IDENTIFIED 
IN REQUEST OR OBTAIN NEW 
LGE BY EXECUTING STEPS 
2A-2D AS A SUBROUTINE. 

| 06 | QUEUE ACE TO LGE PROCESS 
QUEUE . 



[07] 



RELEASE ASM LOCK. 





ASMHD ACE 












ASHLGEQ 














LGE 


■ 




LGEPROCQ 

















1 04 1 THE ACE IS OBTAINED BEFORE THE 

LOCK IN ORDER TO ALLOW EXPANSION 
OF THE ACE POOL IF NECESSARY. 

| 05 | IF REQUEST IS FOR RELEASE ' S' 

SYMBOL, LGE MAY NOT EXIST DUE TO 
A WARM START. FOR ACTIVATE 
REQUESTS, AN LGE IS ASSUMED TO 
NEVER EXIST. A NEW LGID AND LGE 
ARE CREATED IN THESE CASES. 

| 06 | THE ACE IS QUEUED IN 

ANTICIPATION OF ASYNCHRONOUS 
COMPLETION OF GROUP OPERATIONS 
AND TO PREVENT ANY OTHER 
OPERATION FROM STARTING UNTIL 
THIS OPERATION COMPLETES. 

| 07 | THE ASM LOCK IS RELEASED BEFORE 
CALLING ANY GROUP OPERATORS 
BECAUSE THEY ARE IN PAGEABLE 
LPA. PAGE FAULTS MUST NOT OCCUR 
WHILE A GLOBAL LOCK IS HELD. 



Diagram 25.1 1 ILRGOS (Part 2 of 3) 
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| 08 | IF NO OTHER REQUESTS 

QUEUED TO LGE, START GROUP 
OPERATION BY CALLING 
CORRECT GROUP OPERATOR. 

| 09 | FOR SAVE, OR ACTIVATE 

REQUESTS, IF STEP 8 NOT 
EXECUTED, WAIT FOR OTHER 
OPERATIONS TO COMPLETE, 
THEN EXECUTE STEP 8. 



10 



RETURN TO VBP PASSING 
RETURN DATA IN ACA. 



[08 | IF THE OPERATION CANNOT BE 

STARTED IMMEDIATELY THE LGE IS 
MARKED WORK PENDING. 

[09~| ILRGOS WAITS ON AN ECB IN THE 
ACE THAT WILL BE POSTED BY SRB 
CONTROLLER WHEN ALL CURRENTLY 
QUEUED WORK ON THE PROCESS QUEUE 
IS COMPLETE. IF OR WHEN THE 
GROUP OPERATOR CAN BE CALLED, 
GOS ALLOCATES A VSAM BUFFER FOR 
THE OPERATION VIA A COUNT. IF NO 
BUFFERS ARE AVAILABLE, ILRGOS 
WAITS FOR ONE TO BECOME 
AVAILABLE. AT THIS TIME THE SAVE 
OR ACTIVATE GROUP OPERATOR IS 
CALLED. UPON RETURN, THE VSAM 
BUFFER IS RETURNED TO THE 
GENERAL POOL AND ANY GOS ROUTINE 
WAITING UNDER ANOTHER TCB FOR 
THE BUFFER IS POSTED. NOTE THESE 
ACTIONS ARE TAKEN ONLY FOR SAVE 
OR ACTIVE REQUESTS. NO WAIT OR 
VSAM BUFFER MANAGEMENT IS 
NECESSARY FOR RELEASE LG 
REQUESTS . 

| 10 | INFORMATION IN THE ACE IS MOVED 
TO THE ACA AND THE ACE DEQUEUED 



ILRSAV 
ILRACT 
ILRRLG 



ILRSAV 
ILRACT 
ILRRLG 



Ref 



AND FREED WHEN THE OPERATION IS 
COMPLETE . 



Diagram 25.1 1 ILRGOS (Part 3 of 3) 
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FROM ILRRLG OR 
ILRGOS01 


LGVT R 1 














^ 




LGVTE 


f 

LGE 












*l I 






I I" 






; 


\SMHD 








ASHLGEQ 






y 























| 01 I ILRFRELG SECONDARY ENTRY 
POINT TO ILRGOS. 

|02| OBTAIN ASM CLASS LOCK. 
| 03 | DEQUEUE LGE FROM ASMHD. 



| 04 | RELEASE ASM CLASS LOCK AND 
OBTAIN S ALLOC LOCK. 

| 05 | FREE LGVTE FOR LGE BY 
PUTTING IT ON LGVTE 
AVAILABLE QUEUE. 

| 06 | FREE SQA SPACE FOR LGE. 



07 RELEASE S ALLOC LOCK. 



F> 



RETURN TO 
ILRRLG OR 
ILRGOS 01 



LGVT 










LGVTE 




ASMHD 





















j 01 I THE ILRFRELG ENTRY POINT IS 

CALLED BY ILRRLG AND ILRGOS01 TO 
FREE THE LGE SPACE AND MAKE THE 
LGID AVAILABLE (BY PUTTING ITS 
ASSOCIATED LGVTE ON THE 
AVAILABLE QUEUE) FOR THE LOGICAL 
GROUP BEING RELEASED. THIS ENTRY 
POINT IS REQUIRED BECAUSE GLOBAL 
LOCKS ARE REQUIRED TO PERFORM 
THESE FUNCTIONS. ILRRLG IS IN 
PAGEABLE LPA AND CANNOT HOLD 
GLOBAL SPIN LOCKS. 

[ 02 | THE ASM CLASS LOCK OF THE 

ADDRESS SPACE SERIALIZES THE 

QUEUE OF LGES BASED IN THE 
ASMHD. 

| 03 [ THE LGE QUEUE IS SEARCHED FOR 
THE INPUT LGE WHICH IS THEN 
DEQUEUED. 

| 04 | THE ASM CLASS LOCK IS NO LONGER 
REQUIRED AND THE S ALLOC IS 
REQUIRED TO SERIALIZE THE 
FREEING OF THE LGVTE AND THE 
CALLING OF FREEMAIN. 



| 05 | THE LGVTE IS FREED BY QUEUEING 
IT TO THE LGVTE AVAILABLE QUEUE 
IN THE LGVT HEADER AND PLACING 
THE LGID IN THE LGVTE. 

| 06 | THE SPACE USED FOR THE LGE IS 
FREED VIA THE GLOBAL BRANCH 
ENTRY POINT TO FREEMAIN. 

[07| THE SALLOC LOCK IS FREED BEFORE 
RETURNING . 



GLBRANCH 



Diagram 25.11.1 ILRFRELG (Part 1 of 1) 
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ILRSRBC: 
foTI ENTRY SETUP 



SETFRR FOR RECOVERY AND 
OBTAIN THE ASM LOCK FOR 
THE CURRENT ADDRESS SPACE. 



THE SRB CONTROLLER (ILRSRBC) 
ALWAYS RECEIVES CONTROL FROM THE 
DISPATCHER AS THE RESULT OF A 
SCHEDULE BY ILRGOS OR ILRVIOC. 
EACH LGE PROCESS QUEUE FOR THE 
CURRENT ADDRESS SPACE IS 
SEARCHED FOR WORK THAT CAN BE 
STARTED. PAGE OPERATIONS ARE 
STARTED BY CALLING THE RESTART 
ENTRY POINT (ILRESTRT) OF 
ILRPOS. GROUP OPERATIONS, EXCEPT 
FOR RELEASE LG AND DEACTIVATE, 
ARE STARTED BY POSTING THE ECB 
WAITED ON BY ILRGOS. FOR RELEASE 
LG, ILRRLG IS CALLED. DEACTIVATE 
IS PROCESSED BY SRB CONTROLLER. 

THE ASM LOCK FOR THE CURRENT 
ADDRESS SPACE IS OBTAINED AFTER 
DOING A SETFRR TO ESTABLISH THE 
RECOVERY ENVIRONMENT. ILRSRB01 
RECOVERY ROUTINE HANDLES ERRORS 
OCCURRING IN ILRSRBC. THE SRB IS 
MADE AVAILABLE REUSE. EACH LGE 
QUEUED TO THE ASMHD THAT HAS 
WORK PENDING AND NO GROUP 
OPERATION IN PROGRESS IS 
'PROCESSED IN STEPS 3 AND 4. 



Diagram 25.12 ILRSRBC (Part 1 of 3) 
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Output 



FOR EACH LGE WITH WORK 
PENDING AND A GROUP 
OPERATION NOT IN PROGRESS, 
SEARCH PROCESS QUEUE. 

A. IF A GROUP-OPERATOR ACE 
IS FIRST ON THE QUEUE, 
THE ACE IS SAVED FOR 
STEP5 . 

B. IF A TRANSFER PAGE ACE 
HAS A FIXED LPME 
ADDRESS AND LPME IS NOT 
IN PROGRESS, CALL 
ILRTRPAG SUBROUTINE OF 
ILRPOS, DEQUEUE AND 
FREE THE ACE. 

C. IF AN AIA HAS A FIXED 
LPME ADDRESS AND THE 
LPME IS NOT IN 
PROGRESS, SAVE AIA 
ADDRESS FOR STEP4. 

D. SEARCH OF PROCESS QUEUE 
STOPS WHEN A GROUP 
OPERATOR ACE IS FOUND. 



THE PROCESS QUEUE IS SEARCHED 
FOR EACH LGE QUEUED TO THE ASMHD 
OF THE CURRENT ADDRESS SPACE. IF 
NO WORK IS PENDING OR A GROUP 
OPERATION IS IN PROGRESS, THE 
LGE IS SKIPPED AS THERE IS NO 
STARTABLE WORK. 

A. THE ACE IS SAVED UNTIL THE 
ASM LOCK IS RELEASED. GROUP 
OPERATORS ARE PAGEABLE AND 
MUST NOT BE CALLED WHILE 
HOLDING THE ASM LOCK. 

B. TRANSFER PAGE REQUESTS MAY BE 
PROCESSED IMMEDIATELY WITH 
THE LOCK HELD. 

C. AIAS TO BE PROCESSED ARE 
SAVED FOR A SINGLE CALL TO 
ILRESTRT. THIS IS DONE 
BECAUSE RESTART MUST BE 
ENTERED WITHOUT THE ASM LOCK. 
IF I/O IS PENDING FOR A TRP 
ACE, THE IN- PROGRESS FLAG IS 
SET. IF LPME IN-PROGRESS, ACE 
OVERRIDE FLAG OVERRIDES THE 
IN-PROGRESS FLAG. 

D. THIS ACTION ALLOWS FULL 



SERIALIZATION OF THE LOGICAL 
GROUP, ASSURING THAT 
OPERATIONS ARE PERFORMED IN 
THE ORDER RECEIVED. 



Diagram 25.12 ILRSRBC (Part 2 of 3) 
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Output 



CALL THE RESTART ROUTINE 
OF ILRPOS, PASSING ANY 
AIAS SAVED IN STEP 3C IN 
ORDER TO START PAGING I/O 



CO 



ILRESTRT 



ASM ROUTINE 



IF ANY ACES SAVED IN STEP 
3A, POST THE ACEECB FOR 
SAVE OR ACTIVATE REQUESTS. 
CALL ILRRLG FOR RELEASE OR 
DEACTIVATE ACES. 




[05] 



THE RESTART ROUTINE WILL PERFORM 
FINAL AIA PROCESSING BEFORE 
PASSING THE AIAS TO ILRQIOE TO 
INITIATE PAGING I/O. 

GROUP OPERATIONS READY TO BE 
STARTED ARE STARTED BY POSTING 
THE ECBS ILRGOS IS WAITING ON. 
ILRGOS THEN STARTS THE OPERATION 
BY CALLING THE GROUP OPERATOR. 
IF THE ACE IS FOR A RELEASE LG 
REQUEST, THE GROUP OPERATOR IS 
CALLED. DEACTIVATE ACES ARE 
PROCESSED ONLY BY SRB 
CONTROLLER. THEY WERE CREATED BY 
ILRJTERM DURING JOB DELETION 
PROCESSING. 



IEAVSY50 
ILRRLG 



IEAOPT02 
ILRRLG 



Ref 



Diagram 25.12 ILRSRBC (Part 3 of 3) 
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RSMHD 




FROM 


ILRPAGCM 


1 


IJ * 






> 


I 








REG 3 




ASMHD 










1 


_Jt_ 


ASMVT 




REG 4 






- 
















1 


_ll 


ATA 




REG 1 


r |ataaia 




1 In 


AIA 








■ 


AIACEPTR 




AIALGE 




] 


\CE 








^GE 








MA 






r |aialpmep 




1 


1 




» 


u 


\SPCT 




















LPME 













Processing 



ILRVIOCM: 
1 1 I OBTAIN ASM CLASS LOCK. 



| 02 | IF AIA SPECIAL, BUT ERROR - 
BITS SET BY ILRPOS: 

A. RESET 
PROCESS-IN-OPERATION 
FLAG IN LPME. 

B. DEQUEUE AND FREE THE 
ACE. 

C. IF WORK PENDING, SKIP 
TO STEP 7. OTHERWISE 
SKIP TO STEP 8. 

[ol] IF AIA SPECIAL, NO ERROR 

BITS ON, MOVE LSID TO ACE, 
AND SET WORK PENDING FOR 
LGE ACE QUEUED ON. SKIP TO 
7. 

| 04 | IF AIA NORMAL BUT MARKED 
BAD BY ILRPOS, SKIP TO 7. 



Output 



L 



ir*l 



L 



I 1 


'1 1 


LGE 




|lgeprocf |J 





VIO completion always receives 
control from page completion, 
one aia is received as input, 
the aia is processed, dequeued 
from its process queue, and 
returned to page completion, 
upon entry, entry information is 
recorded in ata for use during 
recovery. ilriofrr recovery 
routine handles errors occurring 
in ilrviocm. the asm class lock 
is obtained. the pointer to the 
aia is found in the ata, and the 
ascb pointer is found in rsmhd. 

this is a special case created 
by ilrpos when transfer page was 
requested, and the source lsid 
had not yet been determined due 
to a page-out in progress. the 
'special' aia processed here and 
in step 3 is that page out. 

a. obtain addressability to the 
aspct by an internal tras 
(transfer address space.) 
macro. reset 

process-in-operation flag in 
lpme and tras back. 



B. DEQUEUE AND FREE THE ACE 
RELATED TO THE SPECIAL AIA 
WITH ERRORS. 

1 03 j FOR A 'SPECIAL' AIA WITH NO 

ERROR BITS ON, MOVE LSID FROM 
AIA TO ACE, SET WORK PENDING 
FLAG IN LGE AND SCHEDULE SRB FOR 
ILRSRBC. 

[oT| IF AIA NORMAL BUT ERROR BITS ON, 
DEQUEUE IT AND SCHEDULE SRB FOR 
ILRSRBC IF REQUIRED. 



Diagram 25.13 ILRVIOCM (Part 1 of 2) 
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LGE 


| LGEPROCF 




1 




1 




- 







=t 



AIA/ACE QUEUE 



(05] 


IF AIA HAD NO ERRORS SET 
BY ILRPOS, OBTAIN 
ADDRESSABILITY TO THE 
ASPCT . 

A. FOR PAGE-IN, SET I/O 
ERROR FLAG AS NEEDED. 








TO LPME AND SET LPME 






VALID. 






C. RESET THE LPME 






PROCESS-IN-OPERATION 






FLAG, AND RETURN TO 






PRIOR ADDRESSABILITY. 




[06] 


DEQUEUE THE AIA AND RESET 
ITS PROCESS-IN-OPERATION 
FLAG. IF NO WORK PENDING, 
SKIP TO STEP 8. 


\ 


El 


SCHEDULE SRB IF ONE NOT 
ALREADY SCHEDULED. 




[08] 


RELEASE ASM LOCK, CLEANUP 
AND RETURN. 






r 


V 
RETURN TO 
ILRPAGCM 



Output 



Notes 



| 05 | FOR NORMAL AIA WITH NO ERRORS: 
ADDRESSABILITY TO THE ASPCT IS 
OBTAINED BY AN INTERNAL TRAS 
(TRANSFER ADDRESS SPACE) MACRO 
THAT LOADS THE SEGMENT TABLE 
ORIGIN ADDRESS FOR THE ADDRESS 
SPACE CONTAINING THE ASPCT. 

A. PAGE-IN AIA: IF PERMANENT 
READ ERRORS OCCUR, THE LPME 
IS SO FLAGGED TO GIVE TRUE 
ERROR CODES FOR ANY FUTURE 
REQUESTS FOR THIS PAGE. 

B. PAGE-OUT AIA: SINCE THIS 
ROUTINE DOES NOT RECEIVE 
PAGE-dUT AIAS WITH I/O 
ERRORS, THE LSID CAN SIMPLY 
BE MOVED FROM THE AIA TO THE 
LPME. 

C. IN EITHER CASE, THE LPME 
PROCESS-IN-OPERATION FLAG IS 
RESET AND ADDRESSABILITY TO 
THE ADDRESS SPACE AT ENTRY IS 
RESTORED. 

| 06 | THE AIA IS DEQUEUED FROM ITS LGE 
PROCESS QUEUE BECAUSE ONCE IT IS 



RETURNED TO I/O CONTROL (WHO 
RETURNS IT TO RSM) RSM WILL FREE 
THE PCB/AIA FOR REUSE. THE AIA 
PROCESS-IN-OPERATION FLAG IS 
RESET. 



| 07 | IF ANY WORK IS PENDING FOR THE 
LGE PROCESSED SRB CONTROLLER IS 
SCHEDULED TO ATTEMPT TO START 
THE WORK. 

[08] THE ASM LOCK IS RELEASED, AND 

THE INPUT AIA IS RETURNED TO 

ILRPAGCM VIA A POINTER IN THE 
ATA. 



Diagram 25.13 ILRVIOCM (Part 2 of 2) 
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lJ~*f 



RETURN AD. 



Output 



FROM IEFSD166 



t> 



I' 



LGE QUEUE 



| 01 | ASM JOB TERMINATION 
ROUTINE. 

| 02 | CHECK CURRENT ADDRESS 
SPACE ASMHD FOR QUEUED 
LGE'S. IF NONE, SKIP TO 7 
(NO ACTIVE VIO DATA SET) . 

j 03 1 OBTAIN THE LOCAL LOCK AND 
SETFRR TO ESTABLISH 
RECOVERY . 

| 04 | SEARCH LGE QUEUE. IF 

RELEASE LG NOT QUEUED FOR 
AN LGE, THEN: 

A. GET AN ACE. 

B. INITIALIZE THE ACE. 

C. QUEUE ACE'S INTERNALLY. 




j 01 | JOB TERMINATION PROCESSING 
RECEIVES CONTROL FROM THE 
INITIATOR JOB DELETION MODULE 
(IEFSD166) WHICH CALLS THIS 
ROUTINE ON ALL JOB TERMINATIONS. 

| 02 | NO LOCKS HELD,KEY0, SUPERVISOR 

STATE. IHAPSA CONTAINS A POINTER 
TO THE ASCB, WHICH IN TURN 
CONTAINS A POINTER TO THE RSMHD. 
THE RSMHD CONTAINS THE ASMHD 
WHICH WILL LOCATE ANY QUEUED 
LGE'S. THE NORMAL SITUATION IS 
THAT NO LGE'S ARE QUEUED FROM 
ASMHD, AND CONTROL IS RETURNED 
IMMEDIATELY TO IEFSD166. (SKIP 
TO 7) . 

| 03 | IF AN LGE WAS FOUND, THEN THE 

LOCAL LOCK IS OBTAINED IN ORDER 
TO SERIALIZE THE LGE QUEUE 
AGAINST ASSIGN AND RELEASE LG, 
AND TO ALLOW SETFRR COVERAGE. 
ILRJTM01, ANOTHER ENTRY POINT, 
IS THE RECOVERY ROUTINE 
INDICATED ON THE SETFRR. 

I 04 I IF RELEASE LG NOT QUEUED 



(LGERELLG='0'B) , AN ACE IS 
REQUIRED VIA ILRGMA FROM THE ACE 
POOL IN ASMVT. THE ACE OPCODE, 
LGID, LGE PTR, ETC. FIELDS ARE 
INITIALIZED, AND THE ACE IS KEPT 
ON AN INTERNAL QUEUE FOR 
PROCESSING IN STEP 5. 



Routine Label 



Diagram 25.14 ILRJTERM (Part 1 of 2) 
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| 05 | IF ANY ACE'S BUILT: 



A. OBTAIN ASM CLASS LOCK. - 

B. QUEUE EACH ACE TO 
CORRECT LGE PROCESS 
QUEUE AND SET LGERELLG 
FLAG ON TO BLOCK FUTURE 
REQUESTS FOR LGID. 

C. SCHEDULE SRB AT LOCAL 
LEVEL. 

D. RELEASE ASM CLASS LOCK. 

| 06 | DELETE FRR AND RELEASE 
LOCAL LOCK. 



|07| SET REGISTER 15 TO AND 
RETURN. 



LGE PROCESS 
QUEUE 



i 



| 05 | ONCE THE SEARCH IS COMPLETE, IF 
ANY ACE'S HAVE BEEN BUILT IN 
STEP 4, THE ASM CLASS LOCK IS 
OBTAINED, THE ACE'S ARE QUEUED 
ON TO THE CORRECT LGE PROCESS 
QUEUE AND LGERELLG IS SET. IF AN 
SRB WAS NOT YET SCHEDULED, 
(ASHSCHED='0'B) THEN IT IS 
SCHEDULED AND ASHSCHED IS SET. 
THE ASM CLASS LOCK IS RELEASED. 

1 06 1 FRR IS DELETED AND LOCAL LOCK 
RELEASED. 

| 07 | RETURN CODE (REG 15) IS ALWAYS 
SET TO FOR COMPLETENESS - 
CALLER DOES NOT NEED TO CHECK. 



Diagram 25.14 ILRJTERM (Part 2 of 2) 
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11+ 



J 



REG 

1 4=RETURN 

ADDR 



REG 

15=JTM01 

ENTRY 

POINT ADDR 

IN 

CVTJTERM 



ILRJTM01: 
I 01 I INITIALIZATION PROCESSING. 



02 FOR NON-RETRYABLE ERRORS. 

' 1 SET LOCK FREEING FLAGS IN 

THE SDWA. SKIP TO STEP 6. 



03 FOR RETRYABLE ERRORS WITH 

1 ' NO RECURSION, 

UNCONDITIONALLY ACQUIRE 
THE ASM CLASS LOCK? 



04 SET UP THE SDWA FOR RETRY. 



| 05 | SET RECURSION FLAG. 



| 06 | RETURN TO CALLER. 



7=$ 



TO R/TM 
(IEAVTRTS) 



| REG 4 



ATA 








ATARCRF1 







ILRJTM01 IS THE RECOVERY ROUTINE 
FOR ILRJTERM. PLACE NECESSARY 
POINTERS IN REGISTERS FOR THIS 
ROUTINES PROCESSING AND AS RETRY 
REGISTERS. COPY THE MODULE, 
CSECT, AND RECOVERY ROUTINE IDS 
INTO THE SDWA. 



PERCOLATION CAUSES MEMORY 
TERMINATION. INDICATE THAT RTM 
IS TO FREE THE LOCAL AND ASM 
LOCKS ACQUIRED BY ILRJTERM. 



REGISTER 13 IS LOADED FROM THE 
ATA. ILRJTM01 STORES ITS 
REGISTERS INTO THE SDWA 
(SDWASRSV) TO BE USED AS RETRY 
REGISTERS. ILRJTERM' S RETRY 
POINT, ILRCRTR1, IS PLACED IN 
THE SDWA. SDWA RECORDING AND 
RETRY INDICATORS ARE SET. 



THE RECURSION FLAG, ATARCRF1 , IS 
TURNED ON TO PREVENT A RETRY FOR 
ANOTHER ERROR IN ILRJTERM. 



Diagram 25.14.1 ILRJTMOl (Part 1 of 1) 
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VIO Group Operators 

The VIO Group Operators perform all processing 
necessary to create, save, restore, and delete a 
logical group (lg) and its associated ASPCT. The 
three basic operators are SAVE, ACTIVATE, and 
RELEASE. Two other routines that assist the 
operators are the Task Mode Release routine and 
the vsam Interface routine. 

The save, activate, and release operators 
execute in the address space to which an LG is 
assigned. The SAVE and ACTIVATE operators are 
invoked only by ILRGOS. The RELEASE operator 
can be invoked either by ILRGOS or by the SRB 
Controller. 

Task Mode Release processing occurs in the 
Master Scheduler address space as an extension of 
RELEASE processing when the LG being released 
has been previously saved. Task Mode Release gets 
control via a POST by RELEASE whenever a saved 
copy of an LG exists on sysi.stgindex. This 
processing occurs asynchronously to processing in 
the address space owning the LG because vbp 
requires no return data. It also prevents 
unnecessary delays in normal job deletion 
processing. 

The VSAM Interface routine is a service routine, 
used by SAVE, activate, and Task Mode Release 
to access the sysi.stgindex data set. This data 
set is used to save copies of ASPCT s for journaled 
logical groups. 

Note that a fourth group operation can be 
requested by VBP. This is the ASSIGN LG operation. 
Processing of this request occurs within ILRGOS, as 
described in Chapter 3, "VIO Control". 

SAVE Operator 

The SAVE Operator saves active VIO ASPCTs on 
sysi.stgindex. ilrgos passes control to the 
SAVE Operator (ILRSAV) with an ACE as input. 
The ACE contains either an 's' symbol or an LGID, 
and a pointer to the lge. 

If the input ACE contains an LGID, ILRSAV is 
processing a previously unsaved logical group. 
ILRSAV flags each valid lpme as saved and 
increases the saved slot counter in the ASPCT. 
ILRSAV then calls ilrvsami to write the ASPCT to 
SYSI.STGINDEX. After ILRVSAMI returns, ILRSAV 
flags the ASPCT as saved, copies the 'S' symbol 
(assigned by ILRGOS) from the ASPCT to the ACE, 
and returns to ILRGOS. 

If the input ACE contains an 's' symbol, ILRSAV 
is processing a previously saved logical group. 
ILRSAV calls ILRVSAMI to retrieve and erase the 



previously saved copy of the ASPCT. After 
ilrvsami returns, ILRSAV flags each valid LPME as 
saved* frees the unneeded storage for the old 
ASPCT, and updates the appropriate counters. 
ilrsav then calls ILRVSAMI to write the ASPCT to 
sysi.stgindex. After ilrvsami returns, ILRSAV 
flags the ASPCT as saved and flags it as having no 
slots released after the save. ILRSAV then copies 
the 'S' symbol (assigned by ILRGOS) from the 
ASPCT to the ACE and returns to ILRGOS. 

ACTIVATE Operator 

The ACTIVATE Operator (ILRACT) retrieves a 
saved ASPCT from SYSI.STGINDEX and rebuilds it 
in the current address space's LSQA. 

ILRGOS passes control to ILRACT with an ACE 
as input. The input ACE contains 'S' symbol and a 
pointer to the newly-created LGE. During an 
ACTIVATE request, there is never an active ASPCT 
for the VIO data set being activated. 

ILRACT calls ILRVSAMI to retrieve the ASPCT 
from sysi.stgindex. After ilrvsami returns, 
ILRACT copies the new lgn from the lge (both 
built by ILRGOS) into the ASPCT, copies the 
retrieved ASPCT from I/O buffers to LSQA storage, 
frees the I/O buffers, stores the LSQA address of 
the ASPCT in the LGE, and returns to ILRGOS. 

RELEASE Operator 

The release Operator (ilrrlg), along with the 
Task Mode Release Operator (described in the 
next section), releases paging slots back to the 
system and erases saved ASPCTs from 
sysi.stgindex. ilrrlg posts Task Mode Release 
only if the LG being released has been previously 
saved. 

ilrgos or ilrsrbc passes control to ilrrlg 
with an ace as input. The ACE contains either an 
's' symbol or an LGID, and, if the VIO data set is 
active, a pointer to the LGE. 

If the ACE contains an LGID, the data set is 
active. ILRRLG releases valid LPMEs frees the LSQA 
storage used for the ASPCT, and calls ilrfrelg 
(entry point of ILRGOS) to free the LGE storage 
and mark the lgvte as available. ILRRLG also 
updates the appropriate slot counters, then returns 
control to either ILRGOS or ILRSRBC. 

If the ACE contains an 's' symbol, the ASPCT 
has been saved and the data set may or may not be 
active. If the ASPCT is not active, ilrrlg sets the 
inactive flag in the input ACE. In either case, 
ILRSAV adds the ACE to the head of the release 
queue in the asmvt, issues a POST to start Task 
Mode Release processing, and updates the 
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appropriate slot counters. If the ASPCT is active, 
ILRRLG calls ilrfrelg (entry point of ilrgos) to 
free the lge storage and mark the lgvte 
available. 

Task Mode Release Operator 

The Task Mode Release Operator (ilrtmrlg) has 
two responsibilities: to call Task Mode Initialization 
(ILRTMI00) to complete ASM initialization, and to 
complete the release processing for a saved ASPCT. 

ILRTMRLG runs under the asm tcb in the 
Master Scheduler address space established during 
system initialization. The Master Scheduler attaches 
ilrtmrlg. ilrtmrlg establishes the recovery 
environment via an ESTAE, initializes pointer, then 
loads the Task Mode Initialization routine 
(ILRTMI00). Upon return, ilrtmrlg deletes 
ILRTMI00, posts Master Scheduler Initialization, and 
issues a wait on the ECB in the ASMVT. 

ILRRLG posts this ECB to start Task Mode 
Release processing, ilrtmrlg processes a queue 



of ACEs, each representing a LG whose ASPCT is 
saved on sysi.stgindex. ilrtmrlg calls 
ILRVSAMI to retrieve and erase the saved copy of 
the aspct on sysi.stgindex. After ilrvsami 
returns ILRTMRLG frees all slots assigned in the 
ASPCT. After it has processed all the ACEs, 
ILRTMRLG waits on its ECB for more work. 

VSAM Interface 

The VSAM Interface routine (ILRVSAMI) supplies 
all the necessary functions the VIO Group operators 
require for access to SYSI.STGINDEX. There are 
separate subroutines for each function required by 
each operator. The functions are: 

• get ASPCT — retrieve an ASPCT from 

SYSI.STGINDEX. 

• PUT aspct — write an ASPCT to 

SYSI.STGINDEX. 

• RETERASE — retrieve and then erase an 
ASPCT from SYSI.STGINDEX. 
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FROM ILRGOS 




ILRACT: 
| 01 | ACTIVATE GROUP OPERATOR 

I 02 I OBTAIN NECESSARY 
1 ' RESOURCES. 

I 03 | RECORD ENTRY INFORMATION 
1 ' IN EPATH. ^ 

1 04 I BUILD THE PARAMETER LIST 
1 1 FOR ILRVSAMI. 



05 CALL ILRVSAMI TO RETRIEVE 

1 ' ASPCT FROM SYS1 .STG INDEX. 

IF RETRIEVAL UNSUCCESSFUL 
GOTO STEP 8. 

CD 



c 



ASM ROUTINE 



06 UPDATE THE ASPCT BASE WITH- 

1 ' CURRENT LGN. BACKUP SLOT - 

COUNT, AND ASCB POINTER. 



THE ACTIVATE GROUP OPERATOR 
(ILRACTf IS RESPONSIBLE FOR 
RETRIEVING A SAVED ASPCT FROM 
SYS1 .STGINDEX AND REBUILDING IT 
IN THE CURRENT ADDRESS SPACE 
LSQA. ILRGMA IS USED TO OBTAIN A 
WORKAREA FROM ASM T S POOL OF 
WORKAREA. FOR RECOVERY PURPOSES, 
ILRGOS01 RECOVERY ROUTINE 
HANDLES ERRORS OCCURRING IN 
ILRACT AND ITS PATH THROUGH 
ILRVSAMI . 



IF ILRGMA IS UNSUCCESSFUL IN 
OBTAINING A WORKAREA. THE RETURN 
CODE IS SET TO 28, AND ILRACT 
RETURNS TO ILRGOS. 



ILRACT 'S CSECT IDENTIFIER IS SET 
IN THE EPATH. THE POINTER TO THE 
WORKAREA IS STORED IN THE EPATH. 



STORE THE ADDRESS OF THE EPATH 
IN THE WORKAREA PARAMETER LIST 
FOR ILRVSAMI. STORE THE ADDRESS 
OF ACESYM IN THE PARAMETER LIST, 
AND SET THE REQUEST OP CODE TO A 



CALL ILRVSAMI TO RETRIEVE THE 
ASPCT FROM SYS 1. STGINDEX. IF 
ILRVSAMI WAS UNSUCCESSFUL, SAVE 
THE RETURN CODE IN THE WORKAREA 
AND SKIP TO STEP NO. 9. 



THE RETRIEVED ASPCT BASE IS NOW 
UPDATED. THE LGE (ASPLGIDf IS 
COPIED FROM THE LGE ( LGELGID) . 
THE ASCB POINTER iASPASCB) IS 
INITIALIZED FROM PSAAOLD. THE 
POINTER TO THE LGEj(ASPLGE) IS 
INITIALIZED THE ADDRESS- OF THE 
LGECACELGE). THE NUMBER OF SLOTS 
REQUIRED TO BACK THE VIO DATASET 
(ASPBKSLTL IS CALCULATED BY 
DIVIDING THE MAXIMUM 
RPN(ASPMAXPN) BY TK~ 
VALUE OF ILRSLOTV. 
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07 REBUILD THE ASPCT IN USER 
1 1 LSQA STORAGE. 



03 



RETURN TO CALLER. 



±=5 



THE INTERNAL SUBROUTINE REBUILD 
IS CALLED TO COPY THE ASPCT IN 
BUFFER (S) STORAGE TO LSQA. 



SAVE THE RETURN CODE IN 
WORKAREA: IF IT WAS NON-ZERO 
SKIP TO STEP 9. 



1 STORAGE IS ANCHORED IN 
(LGEASPCT) x . AND THE_ 



THE LSC 

THE LGE ,„,„,„._..,, ™„ x..„ 
NUMBER OF SLOTS ACTUALLY USED BY 
THE ASPCT (ASPSAVCT) IS COPIED TO 
THE LGE(LGESLTCT) . 



SAVE THE INTERNAL WORKAREA 
RETURN CODE IN THE USERS REG .15. 
USE ILRGMA TO RETURN THE 
WORKAREA TO ITS POOL. 



Diagram 25.15 ILRACT (Part 2 of 2) 
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REBUILD: 
|0l| SAVE RETURN ADDRESS. 

I 02 I CALCULATE THE NUMBER OF 
1 1 ASPCT T S TO BE REBUILT. 



03 CALCULATE THE AMOUNT OF 

1 ' LSQA STORAGE NEEDED TO 

REBUILD THE ASPCT . 



| 04 | OBTAIN THE LSQA STORAGE. 



05 COPY THE ASPCT FROM BUFFER' 
1 ' STORAGE TO LSQA STORAGE. 



06 FREE THE BUFFER STORAGE. 




1 01 I SAVE REGISTER 14 IN WORKAREA. 

I 02 I THE NUMBER OF ASPCT 'S TO BE 

1 ■ BUILT IS THE NUMBER OF ASST 

EXTENSIONS (ASPAEXCT) PLUS THE 
NUMBER OF LPME EXTENSIONS 
(ASPLEXCT) PLUS ONE FOR THE 
ASPCT BASE. 



03 THE AMOUNT OF LSQA SPACE NEEDED 

1 ■ IS THE NUMBER OF ASPCT'S TO BE 

REBUILT TIMES THE LENGTH OF AN 
ASPCT . 



ISSUE A BRANCH ENTRY GETMAIN TO 
OBTAIN THE LSQA SPACE. 

A. IF UNSUCCESSFUL IN OBTAINING 
THE LSQA SPACE. LOAD REG 1 
WITH POINTER TO ASPCT BASE 
AND SET REG TO LENGTH OF 
BUFFER. CALL ILRAFSOO TO FREE 
THE RETRIEVED ASPCT. IF 
ILRAFSOO WAS UNSUCCESSFUL 
ISSUE AN 087 ABEND. SET THE 
RETURN CODE TO 28, AND RETURN 
TO MAINLINE. 



COPY THE ASPCT BASE FROM THE 
BUFFER TO LSQA STORAGE. IF THERE 
ARE NO EXTENSIONS (ASPAEXCT=0) 
THEN SKIP TO STEP 6. 



COPY THE ASST EXTENSION FROM 
BUFFER TO LSQA STORAGE. 



D. UPDATE THE LSQA POINTER BY 



GETMAIN 

ILRAFSOO 

ABEND 



LENGTH OF AN ASST EXTENSION. 



E. STORE LSQA POINTER IN ASST 
EXTENSION (ASPASSTE(I) ) . 



F. COPY THE LPME EXTENSION FROM 
BUFFER TO LSQA STORAGE. 



H. ANYMORE LPME EXTENSIONS 

(I=ASPLEXCT) , THEN GOTO STEP 



I. ANYMORE ASST EXTENSIONS 

(I=ASPAEXCT) , THEN GOTO STEP 
B. 



IF THERE ARE NO EXTENSIONS. 
ISSUE A FREEMAIN FOR THE ASPCT 
BASE BUFFER STORAGE. IF THERE 
ARE EXTENSIONS THE LOAD REG 1 
WITH POINTER TO ASPCT BASE, SET 
REG TO LENGTH OF BUFFER. CALL 
ILRAFSOO TO FREE THE BUFFER 
STORAGE. IF ILRAFSOO WAS 
UNSUCCESSFUL ISSUE AN 087 ABEND. 



07 RETURN TO MAINLINE ILRACT. 



FREEMAIN 
ILRAFSOO 
ABEND 



Diagram 25.15.1 REBUILD (Part 1 of 1) 
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FROM ILRGOS 



fc> 



^ 



ILRSAV: 
I 1 I SAVE GROUP OPERATOR 



03 IF THE LG HAS BEEN 

1 1 PREVIOUSLY SAVED, RETRIEVE 

THE SAVED COPY. 



04 IF THE LG HAS NOT BEEN 

1 1 SAVED, DEFINE SAVLPME AS 

THE PROCEDURE ILRALS00 
WILL USE. 



05 CALL ILRALSOO TO PROCESS 
1 1 THE LPME'S. 



06 IF THERE IS A RETRIEVED 

L — ' ASPCT, CALL ILRAFSOO TO 

FREE THE REBUILT ASPCT. 



THE SAVE GROUP OPERATOR (ILRSAV) 
IS RESPONSIBLE FOR SAVING VIO 
ASPCTS ON SYS1.STGINDEX. IF THE 
INPUT ACE CONTAINS AN LGID, 
ILRSAV WILL BE PROCESSING ONLY 
THE ACTIVE ASPCT. IF THE ACE 
CONTAINS AN T S T SYMBOL, ILRSAV 
WILL BE PROCESSING THE ACTIVE 
AND THE PREVIOUSLY SAVED ASPCTS. 
FOR RECOVERY, ILRGOS01 RECOVERY 
ROUTINE HANDLES ERRORS OCCURRING 
IN ILRSAV AND ITS PATH THROUGH 
ILRVSAMI. 



USE ILRGMA TO OBTAIN A WORKAREA 
FROM ASM'S POOL. IF ILRGMA IS 
UNSUCCESSFUL. SET THE RETURN 
CODE TO 28, AND RETURN TO 
CALLER. SAVE THE POINTERS TO THE 
ASMHD FROM INPUT REG 2, THE 
ASMVT FROM INPUT REG 3, THE 
EPATH FROM INPUT REG 4. AND ACE 
FROM INPUT REG 1. GET POINTERS 
TO LGE FROM ACELGE. AND ASPCT 
FROM LGEASPCT. RECORD THE 
POINTER TO THE WORKAREA IN THE 
EPATH. 



IF THE ASPCT IS FLAGGED AS 
HAVING BEEN SAVED (ASPSAVED=1 ) , 
THEN CALL INTERNAL SUBROUTINE 
SAVEDASP TO RETRIEVE THE SAVED 
ASPCT. 



04 IF THE LG HAS NOT BEEN SAVED, 

1 ■ DEFINE SAVELPME AS THE PROCEDURE 

ILRALSOO WILL USE TO FLAG THE 
LPME AS SAVED. 



ZERO THE FREESLOT AND SAVESLOT 
COUNTERS. LOAD REG WITH THE 
ADDRESS OF THE ACTIVE ASPCT 
BASE. CALL ILRALSOO TO PROCESS 
ALL ACTIVE LPME'S BY CALLING THE 
ROUTINE DEFINED TO IT IN STEP 2 
(BY SAVEDASP) OR STEP 3. 



IF THERE IS A RETRIEVED ASPCT 
(RETASPCT.=0) , LOAD REG WITH 



THE LENGTH OF A VSAM BUFFER, 
LOAD REG 1 WITH ADDRESS OF THE 
RETRIEVED ASPCT BASE. CALL 
ILRAFSOO TO FREE THE BUFFERS. IF 
THERE IS A NON-ZERO RETURN CODE 
FROM ILRAFSOO ISSUE AN 087 
ABEND. 



Diagram 25.16 ILRSAV (Part 1 of 2) 
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[07] 



INDIVIDUAL SLOT COUNT BY 
THE NUMBER FREED. 



08 IF THE NUMBER OF SLOTS 

1 1 SAVED HAS CHANGED. UPDATE 

THE SAVED SLOT COUNTER IN 
THE ASPCT. 



09 CALL ILRVSAMI TO WRITE 

1 ' ASPCT OUT TO 

SYS1.STGINDEX. 



CO 



ASM ROUTINE 



IF THE WRITE WAS 
SUCCESSFUL, FLAG THE 
NECESSARY CONTROL BLOCKS 
ac cat7j?n awn rnov tup »c 



11 IF THE WRITE WAS 

1 1 UNSUCCESSFUL, FLAG THE 

ASPCT AND THE ACTIVE 
LPME'S AS NOT SAVED. 



QZ) 



D3 



RETURN TO CALLER. 





J 






ACELGE 


LGEASPCT 




LGESLTCT 


S ' SYMB 











R 



IF THE FREESLOT COUNTER IS 
NON-ZERO DUE TO SAVLIMBO 
PROCESSING, THEN SUBTRACT THE 
FREESLOT COUNTER FROM THE 
LGESLTCT (ILRGOS WILL USE THIS 
VALUE TO UPDATE THE INDIVIDUAL 
SLOT COUNT IN THE ASCB. ) . 



IF THE SAVESLOT COUNTER IS 
NON-ZERO DUE TO SAVLIMBO 
PROCESSING, THEN UPDATE THE 
SAVED SLOT COUNT IN THE ASPCT 
(ASPSAVCT) BY THE SAVESLOT 
COUNTER. 



09 STORE THE POINTERS TO THE EPATH, 

1 1 AND THE ASPCT BASE IN THE 

WORKAREA PARAMETER LIST FOR 
ILRVSAMI. SET THE REQUEST 
OP-CODE TO 02. CALL ILRVSAMI TO 
WRITE THE ASPCT OUT TO STGINDEX. 



IF THERE IS A ZERO RETURN CODE 
FROM ILRVSAMI, FLAG THE ASPCT AS 
SAVED (ASPSAVED=1) , AND AS 
HAVING NO SLOTS RELEASED AFTER 
SAVE (ASPSAVRP=0) . COPY THE 'S' 
SYMBOL TO THE ACE 
(ACESYM=ASPSSYM) . 



Hi] 



IF THERE IS A NON-ZERO RETURN 
CODE FROM ILRVSAMI, FLAG THE 
ASPCT AS NOT SAVED (ASPSAVED=0) . 
DEFINE UNSAVLPM AS THE PROCEDURE 
ILRALS00. CALL ILRALS00 TO FLAG 
ALL ACTIVE LPME T S AS NOT SAVED. 
ZERO THE SAVE SLOT COUNTER 
(ASPSAVCT) IN THE ASPCT. 



un 
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SAVEDASP: 
foTl DO INITIALIZATION. 



RETRIEVE AND ERASE THE 
SAVED ASPCT ON 
SYS1 .STGINDEX. 



<X> 



ASM ROUTINE 



| 03 | IF THE ASPCT WAS RETRIEVED 
SUCCESSFULLY, SAVE THE 
POINTER TO IT. 

1 04 1 IF NO SLOTS HAVE BEEN 
RELEASED AFTER SAVE, 
SAVLPME IS THE PROCEDURE 
ILRALS00 WILL USE. 

| 05 | IF SLOTS HAVE BEEN 

RELEASED AFTER SAVE, 
SAVLIMBO IS THE PROCEDURE 
ILRALSOO WILL USE. 

| 06 I RETURN TO MAINLINE. 




1 01 I SAVE THE RETURN ADDRESS. GET THE 
ADDRESS OF THE *S' SYMBOL 
(ASPSSYM) IN THE ASPCT. 

[oT| STORE POINTERS TO THE EPATH AND 
THE 'S' SYMBOL IN THE PARAMETER 
LIST FOR ILRVSAMI. SET THE 
REQUEST OP-CODE TO 03 (RETRIEVE 
AND ERASE) . CALL ILRVSAMI TO 
RETRIEVE AND ERASE THE SAVED 
ASPCT ON SYS1. STGINDEX. 

[o7| IF THERE IS A ZERO RETURN CODE, 
SAVE THE POINTER TO THE 
RETRIEVED ASPCT IN THE WORKAREA 
(RETASPCT) . IF THERE IS A 
NON-ZERO RETURN CODE FROM 
ILRVSAMI, TURN THE SAVED FLAG 
(ASPSAVED) OFF IN THE ASPCT. 

| 04 | IF NO SLOTS HAVE BEEN RELEASED 
AFTER SAVE (ASPSAVRP=0 ) , THEN 
DEFINE SAVLPME AS THE PROCEDURE 
ILRALSOO WILL USE TO FLAG THE 
LPME AS SAVED. 

| 05 | IF SLOTS HAVE BEEN RELEASED 

AFTER SAVE (ASPSAVRP=1 ) , THEN 



DEFINE SAVLIMBO AS THE PROCEDURE 
ILRALSOO WILL USE TO PROCESS THE 
SLOTS ACCORDING TO THE LPME 
FLAGS . 

foel RETURN TO MAINLINE. 



Diagram 25.16.1 SAVEDASP (Parti of 1) 
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J 01 | IF THE LPME IS SAVED 

ALREADY, RETURN TO CALLER. 

| 02 | FLAG THE LPME AS SAVED. 



| 03 | INCREMENT INTERNAL 
COUNTER . 



04 RETURN TO CALLER. 




| 1 | IF THE LPME IS FLAGGED AS SAVED 
(ASPLSAVE=1) ,THEN GOTO STEP 4. 



| 02 | TURN THE SAVED FLAG (ASPLSAVE) 
ON IN THE LPME. 



| 03 ) INCREMENT THE SAVESLOT COUNTER 
BY ONE. 



04 RETURN TO CALLER. 



Diagram 25.16.2 SAVLPME (Part 1 of 1) 
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|asplpflg 



M 



I 01 I SAVE POINTERS. 



02 IF THE LPME HAS BEEN 

1 ' SAVED, THEN RETURN TO 

CALLER . 



IF THE LPME HAS NOT BEEN 
RELEASED AFTER SAVE BUT IT 
IS INVALID, THEN RETURN TO 
CALLER . 



04 IF THE LPME HAS NOT BEEN - 

1 1 RELEASED AFTER SAVE. BUT - 

IT IS VALID, THEN FLAG THE 
LPME AS SAVED, INCREMENT 
THE INTERNAL SAVED SLOT 
COUNTER, AND RETURN TO 
CALLER . 



£F^ 



IF THE LPME HAS BEEN 
RELEASED AFTER SAVE, TURN 
OFF THE FLAG. 



| SAVESLOT+l] 



LPME 






ASPLPFLG 1 




ASPLSAVE 









FOR A SAVE LG REQUEST, THIS 
PROCEDURE PROCESSES THE LPMES OF 
THE PREVIOUSLY SAVED ASPCT IN 
WHICH SOME SLOTS WERE RELEASED 
AFTER SAVE. SAVE THE RETURN 
ADDRESS, THE POINTER TO THE LPME 
AND THE CORRESPONDING RPN, IN 
THE WORKAREA. 



IF THE LPME SAVED FLAG 
(ASPLSAVE) IS ON, THEN SKIP TO 
STEP 13. 



IF THE RELEASED AFTER SAVE FLAG 
(ASPLSVRP) AND THE VALID FLAG 
(ASPLVALD) ARE OFF IN THE LPME, 

THEN SKIP TO STEP 13. 



IF THE RELEASED AFTER SAVE FLAG 
(ASPLSVRP) IS OFF AND THE VALID 
FLAG (ASPLVALD) IS ON IN THE 
LPME, THEN FLAG THE LPME AS 
SAVED (ASPLSAVE=1) , INCREMENT 
THE SAVESLOT COUNTER AND SKIP TO 
STEP 13. 



IF THE RELEASED AFTER SAVE FLAG 
(ASPLSAVE) IS ON, THEN TURN IT 
OFF. 



Diagram 25.16.3 SAVLIMBO (Part 1 of 2) 
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06 IF THERE IS NOT A 

1 1 RETRIEVED ASPCT, AND THE 

LPME IS INVALID. THEN 
RETURN TO CALLER. 



IF THERE IS NOT A 
RETRIEVED ASPCT. AND THE 
LPME IS VALID. THEN FLAG 
THE LPME AS SAVED, 
INCREMENT THE INTERNAL 
SAVED SLOT COUNTER, AND 
RETURN TO CALLER. 



IF THERE IS A RETRIEVED 
ASPCT, CONVERT THE RPN. 



09 IF CONVERSION WAS 

1 1 UNSUCCESSFUL, ISSUE AN 085 

ABEND AND RETURN TO 
CALLER . 



10 CALL ILRFRSL1 TO RELEASE 

I ' THE SLOT BACK TO THE 

SYSTEM . 



on 



r 



03 



THE INTERNAL SAVED SLOT 
COUNTER. 

RETURN TO CALLER. 



It* 



ASPLPFLG 1 



|SAVESLOT+1 | 



ASPLPFLG 1 



06 IF THERE IS NOT A RETRIEVED 

1 ' ASPCT (RETASPCT=0) , AND THE LPME 

VALID FLAG (ASPLVALD) IS OFF, 
THEN SKIP TO STEP 13. 



07 IF THERE IS NOT A RETRIEVED 

1 ' ASPCT (RETASPCT=0), AND THE LPME 

VALID FLAG (ASPLVALD) IS ON, 
THEN FLAG THE LPME AS SAVED 
(ASPLSAVE=1). INCREMENT THE 
SAVESLOT COUNTER, AND SKIP TO 
STEP 13. 



08 IF THERE IS A RETRIEVED ASPCT 

1 ' 7rETASPCT-i=0) , CONVERT THE RPN 

TO AN LPME. 



09 IF THE CONVERSION FAILS, ISSUE 

1 ' AN 085 ABEND FOR RECORDING AND 

THEN SKIP TO STEP 13. 



10 SAVE THE POINTER TO THE ACTIVE 

' LPME, CALL ILRFRSL1 TO FREE THE 

SLOT FOR THIS LPME. RESET 
LPMEPTR BACK TO THE ACTIVE LPME. 



D3 



m 



DI UriC, HIMLI J.PH.KE.r'ltNi Til 

FREESLOT COUNTER BY ONE. 



IF THE LPME VALID FLAG IS ON 
(ASPLVALD=1), THEN FLAG THE LPME 
AS SAVED (ASPLSAVE=1), AND 
INCREMENT THE SAVESLOT COUNTER. 



RETURN TO CALLER. 



Diagram 25. 16. 3 SAVLIMBO (Part 2 of 2) 
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1 01 J TURN THE LPME SAVED FLAG 
OFF. 



02 RETURN TO CALLER. 



|0 ASPLSAVEJ 



|01| TURN THE SAVED FLAG (ASPLSAVE) 
OFF IN THE LPME. 

I 02 I RETURN TO ILRALSOO. 



Diagram 25.16.4 UNSAVLPM (Part 1 of 1) 
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ILRRLG: 
j 01 I RELEASE LG GROUP OPERATOR. 



| 02 | GET WORKAREA. IF WORK AREA 
CANNOT BE OBTAINED, RETURN 
WITH ERROR. 

I 03 I INITIALIZE WORKAREA. 



| 04 | ESTABLISH ADDRESSABILITY 
TO LGE. 

1 05 | IF THERE IS AN ACTIVE 
ASPCT, SAVE THE SLOT 
COUNTS FROM THE ASPCT IN 
WORKAREA COUNTERS. 

| 06 | IF THE ASPCT HAS NOT BEEN 
SAVED, SKIP TO STEP 11-. 

j 07 ) IF THE ASPCT IS NOT 

ACTIVE, SET FLAG IN ACE. 




| 01 j THE RELEASE LOGICAL GROUP 

OPERATOR (ILRRLG) TOGETHER WITH 
ILRTMRLG ARE RESPONSIBLE FOR 
RELEASING SLOTS OF THIS LG, 
FREEING THE ACTIVE ASPCT, AND 
ERASING THE SAVED ASPCT FROM 
SYS1 .STGINDEX. FOR RECOVERY, 
ILRGOS01 RECOVERY HANDLES ERRORS 
OCCURRING IN ILRRLG. 

| 02 | RECORD ENTRY IN EPATH. USE 

ILRGMA TO OBTAIN A WORKAREA FROM 
ASM'S POOL. IF ILRGMA IS 
UNSUCCESSFUL (REG 1=0) , SET THE 
RETURN CODE TO 28, AND RETURN TO 
CALLER. 

| 03 | INITIALIZE THE SAVESLOT, 

BACKSLOT, AND FREESLOT WORKAREA 
COUNTERS TO ZERO. 

| 04 | GET THE POINTER TO THE LGE FROM 
THE ACE (ACELGE) . 

| 05 | IF THE LGEASPCT POINTER IS 

NON-ZERO (ACTIVE ASPCT) , STORE 
THE LGEASPCT POINTER IN EPATH, 
SAVE THE ASPBKSLT COUNT IN 



BACKSLOT AND THE ASPSAVCT COUNT 
IN SAVESLOT. 

| 06 | IF THIS LOGICAL GROUP HAS NOT 
BEEN SAVED (ACEUSYM=OFF) , 
PROCEED TO STEP 1 1 . 

| 07 | IF LGEASPCT IS ZERO, SET 
ACENOACT=ON IN ACE. 
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1 08 1 IF THE ASPCT IS ACTIVE: 

A. SET THE ASPCT POINTER - 
IN LGE TO ZERO AND 
DEFINE RLGLPME AS THE 
PROCEDURE ILRALS00 WILL 
USE TO FREE THE UNSAVED 
SLOTS . 

B. FREE THE ACTIVE ASPCT 
STORAGE, ABEND ON 
NON-ZERO RETURN. 

| 09 | IF STG INDEX IS NOT OPEN, 
OR ILRTMRLG IS NOT 
OPERATING, SET AN INTERNAL 
FLAG TO INDICATE THIS ACE 
IS TO BE RETURNED. SET 
RETURN CODE TO 20. SKIP TO 
STEP 12. 



[ 10| IF THIS IS A RELEASE LG 
REQUEST, THEN: 

A." PUT ACE ONTO HEAD OF 
THE RELEASE QUEUE. 

B. POST ILRTMRLG TO FREE 
THE SAVED ASPCT. SKIP 
TO STEP 12. 



1^> 



LGE 

| LGEASPCT=0 | 



ASMVT ACE 






J 'l 1 


ASMRLGRQ 













| 08 J IF LGEASPCT IS NONZERO: 

A. PUT POINTER TO ASPCT IN 
REGISTER 0. SET LGEASPCT TO 
ZERO. CALL ILRALSOO. 

B. PUT POINTER TO ASPCT IN REG 
1 , LENGTH OF ASPCT IN 
REGISTER 0. SET THE EPATH 
ASPCT POINTER TO ZERO. CALL 
ILRAFSOO TO FREE THE ASPCT 
STORAGE. IF REG 15 NOT 0, 
SAVE REGISTERS FOR RECOVERY 
AND ISSUE AN 087 ABEND. 

| 09 | IF ASMSTGXA=0 OR ASMNOTMR=1 , 
THEN SET AN INTERNAL FLAG 
INDICATING THAT THE ACE IS TO BE 
FREED. SET THE RETURN CODE TO 20 
AND PROCEED TO STEP 12. 

| 10[ IF ASMSTGXA=1 AND ASMNOTMR=0 AND 
ACEOP=ACERELLG, THEN: 

A. SET THE FORWARD POINTER IN 
THE ACE TO ZERO. COMPARE AND 
SWAP THE ACE ONTO ASMRLGRQ. 

B. POST ILRTMRLG VIA THE 



ASMTMECB FIELD IN ASMVT. 
ILRTMRLG WILL RELEASE THE 
SAVED ASPCT ON SYS1 . STGINDEX. 



Diagram 25.1 7 ILRRLG (Part 2 of 3) 
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| 1 1 | IF THE ASPCT HAS NOT BEEN 
SAVED, AND THE ASPCT 
POINTER IS NON-ZERO, THEN: 

A. RELEASE THE SLOTS 
ASSIGNED TO THIS LG . 

B. RELEASE THE STORAGE FOR 
THIS ASPCT. 

| 1 2 | CHECK SLOT COUNTERS FOR 

NON-ZERO. UPDATE ASMVT AND 
LGE SLOT COUNTS. 

| 1 3 | CALL ILRFRELG TO RELEASE 
THE LGE. 



<T> 



ASM ROUTINE 



| 14| FREE ACE IF REQUIRED. 



| 15J FREE WORKAREA, CLEAN UP, 
AND RETURN TO CALLER. 



TO CALLER 



ASMVT LGE 




ASMBKSLT 


| LGESLTCT | 


ASMVSC 









HD 



DE 



IF ACEUSYM FLAG WAS OFF, THE 
LGEASPCT IS NON-ZERO, THEN: 

A. LOAD REG WITH POINTER TO 
ASPCT AND CALL ILRALSOO 
(WHICH USES RLGLPME) TO 
RELEASE THE SLOTS ASSIGNED TO 
THIS LG. 

B. LOAD REG 1 WITH POINTER TO 
ASPCT AND SET REG TO LENGTH 
OF THE ASPCT. SET THE EPATH 
POINTER OF THE ACTIVE ASPCT 
TO ZERO, AND CALL ILRAFSOO TO 
FREE THE STORAGE USED FOR 
THIS ASPCT. IF THERE IS A 
NON-ZERO RETURN CODE FROM 
ILRAFSOO, SAVE REGISTERS FOR 
RECOVERY, AND ISSUE AN 087 
ABEND. 

IF THE BACKSLOT COUNTER IS 
NON-ZERO, ADD IT BACK INTO THE 
AVAILABLE SLOT COUNT (ASMBKSLT) . 
IF THE FREESLOT COUNTER IS 
NON-ZERO, SUBTRACT IT FROM. 
ASMVSC AND LGESLTCT. IF THE 
SAVESLOT COUNTER IS NON-ZERO, 
SUBTRACT IT FROM LGESLTCT. 



nu 







SET THE LGE POINTERS TO THE ACE 
TO ZERO. LOAD REG 1 WITH POINTER 
TO LGE AND CALL ILRFRELG TO 
RELEASE THE LGE. 

IF ACEUSYM FLAG WAS OFF OR THIS 
IS A DEACTIVATE REQUEST 

(ACEOP=ACEDEACT) OR STORAGE 
INDEX CLOSED (ASMSTGXA=0) OR 
ILRTMRLG IS NOT OPERATING 

(ASMNOTMR=ON) THEN SET THE ACE 
POINTER IN THE EPATH TO ZERO, 
LOAD REG 1 WITH POINTER TO ACE, 
AND CALL ILRGMA TO FREE THE ACE. 

SET THE WORK AREA POINTER AND 
THE RLG BIT IN EPATH TO ZERO. 
INVOKE ILRGMA TO FREE THE 
WORKAREA RESTORE REGISTERS AND 
RETURN TO CALLER. 



Diagram 25.17 ILRRLG (Part 3 of 3) 
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1 01 [ IF THE LPME IS SAVED, 
RETURN TO CALLER. 

| 02 | IF THE I/O ERROR FLAG IS 
OFF, MARK THE LPME AS 
INVALID. CALL ILRFRSL1 TO 
MAKE SLOT AVAILABLE. 



tt 



CO 



ASM ROUTINE 



INCREMENT INTERNAL FREE 
SLOT COUNTER. 



04 RETURN TO CALLER. 




| 1 | IF THE LPME HAS BEEN SAVED 

(ASPLSAVE=1) , THEN GOTO STEP 4. 
THIS LPME WILL BE PROCESSED IN 
THE MASTER SCHEDULER ADDRESS 
SPACE BY ILRTMRLG. 

| 02 | IF ASPLIOER=OFF, MARK THIS LPME 
AS INVALID (ASPLVALD) . 

) 03 | INCREMENT THE INTERNAL FREED 

SLOT COUNTER BY 1 . THIS COUNTER 
IS USED TO UPDATE THE VIO SLOT 
COUNT IN THE ASMVT (ASMVSC) AND 
THE VIO SLOT COUNT IN THE ASCB 
(ASCBVSC) .. 

I 04 I RETURN TO CALLER. 
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Input 



Processing 



Output 



FROM MASTER 

SCHEDULER 

INITIALIZATION 

fc> 



M.S.I.ECB 





CVT ACE 












CVTASMVT 








; 


\SMVT 




1 






ASMNOSAV J 


UTE 






ASMBKSLT 








ASMVSC 






} 




ASMSLOTV 


^CE 






ASMTMECB 





ASMRLGRQ 










ASMPFRSL 















L^> 



% 



1 03 I COMPLETE ASM 
I 1 TNTTTAI.T7.ATTI 



INITIALIZATION. 



CO 



ASM ROUTINE 



05 WAIT FOR WORK. 



I 06 I MOVE ACE'S ON REQUEST 
1 1 QUEUE TO THE WORK QUEUE. 



1 07 1 REMOVE AN ACE FROM WORK 
1 ■ QUEUE. 



foil CALL ILRVSAMI TO RETRIEVE 

1 ' AND ERASE THE ASPCT FROM 

SYS1 .STGINDEX. 



CO 



ASM ROUTINE 



ASMVT 






ASMNOSAV 






ASMBKSLT 




ASMVSC 




ASMTCBPT 


ASMTMECB 


ASMRLGRQ 


ASMRLGWQ 


ASMSTASCB 




ASMPSAV 


ASMPACT 


ASMPRLG 









ENTRY IS FROM MASTER SCHEDULER 
INITIALIZATION ROUTINE IEEMB860. 
ILRTMRLG HAS TWO SEPARATE 
RESPONSIBILITIES: TO CALL 
ILRTMI00 TO COMPLETE ASM'S 
INITIALIZATION AND TO COMPLETE 
THE RELEASE LOGICAL GROUP 
PROCESSING FOR A SAVED ASPCT. 
ISSUE AN UNCONDITIONAL GETMAIN 
TO OBTAIN SPACE FOR A WORKAREA. 
FOR RECOVERY, ILRTMI01 RECOVERY 
ROUTINE HANDLES ERRORS OCCURRING 
IN ILRTMRLG AND ITS PATH THROUGH 
ILRVSAMI . 



INITIALIZE CERTAIN FIELDS IN THE 
ASMVT. CALL ILRTMI00 IN ORDER TO 
COMPLETE INITIALIZATION OF ASM. 



PLACE THE ENTRY POINTS FOR 
ILRACT. ILRRLG, AND ILRSAV 
INTO THE ASMVT. ALSO PUT THE 
ADDRESS OF THE CURRENT TCB 
AND CURRENT ASCB INTO THE 
ASMVT. 



ISSUE A LOAD OF ILRTMIOO TO 
OBTAIN ITS ENTRY POINT 
ADDRESS. CALL ILRTMIOO TO 
COMPLETE ASM INITIALIZATION. 
SAVE ILRTMIOO 'S RETURN CODE. 
ISSUE A DELETE OF ILRTMIOO TO 
FREE THE STORAGE IT OCCUPIED. 



ISSUE A POST ON THE MASTER 
SCHEDULER INITIALIZATION'S ECB 
TO INDICATE THAT ASM 
INITIALIZATION IS COMPLETE. 



ISSUE A WAIT ON THE ASMTMECB IN 
THE ASMVT. ILRRLG WILL POST THIS 
ECB WHEN THERE IS WORK FOR 
ILRTMRLG TO DO. 



ILRTMIOO 

LOAD 

DELETE 



COMPARE AND SWAP THE ACE'S ON 
THE REQUEST QUEUE (ASMRLGRQ) TO 
THE WORK QUEUE (ASMRLGWQ) . 



[07] 



REMOVE AN ACE FROM THE HEAD OF 
THE WORK QUEUE (ASMRLGWQ) . 



08 STORE THE POINTERS TO THE EPATH 

I ' AND TO THE T S ' SYMBOL IN THE ACE 

INTO THE WORK AREA PARAMETER 
LIST FOR ILRVSAMI. SET THE 
REQUEST OP-CODE TO 04 - RETRIEVE 
AND ERASE FOR RELEASE. PLACE A 
POINTER TO THE PARAMETER LIST 
INTO REGISTER 1, THEN CALL 
ILRVSAMI. IF ILRVSAMI COULD NOT 
RETRIEVE THE ASPCT, SKIP TO STEP 
13. 
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ASMRLGRQ 



03 




03 



IF THIS ASPCT WAS NOT 
ACTIVE DURING THIS 
SESSION, UPDATE THE 
AVAILABLE SLOT COUNT IN 
THE ASMVT. 



IF SYS1.STGINDEX WAS FULL, 
TURN THE FULL INDICATOR 
OFF. 



I 1 3 | RETURN THE ACE TO ITS 
1 ' POOL . 



03 



IF THERE ARE MORE ACE'S ON 
THE WORK QUEUE (ASMRLGWQ) , 
GO BACK TO STEP 7 AND 
REPEAT OPERATION. 

IF THERE ARE MORE ACE'S ON 
THE REQUEST QUEUE, GO BACK 
TO STEP 6 AND REPEAT 
OPERATION. 



IF THERE WERE NO MORE 
ACE'S ON THE REQUEST 
QUEUE. GO BACK TO STEP 
AND WAIT FOR SOME MORE 
WORK. 



ASMVT 






ASMNOSAV 






ASMBKSLT 




ASMVSC 




ASMTCBPT 


ASMTMECB 


ASMRLGRQ 


ASMRLGWQ 


ASMTASCB 




ASMPSAV 


ASMPACT 


ASMPRLG 









DEFINE TMRLPME AS THE PROCEDURE 
ILRALS00 WILL USE. LOAD REG 
WITH POINTER TO THE RETRIEVE 
ASPCT BASE. CALL ILRALSOO TO 
RELEASE THE SLOTS ASSIGNED TO 
THIS ASPCT. UPON RETURN FROM 
ILRALSOO, THE NUMBER OF SLOTS 



10 IF THE ACENACT FLAG IS ON, THIS 

' ' ASPCT WAS NOT ACTIVE SINCE THE 

LAST WARM START I PL. THE NUMBER 
OF SLOTS USED TO BACK UP THIS 
DATA SET IS CALCULATED BY 
DIVIDING THE MAXIMUM NUMBER OF 
SLOTS THAT COULD BE ALLOCATED TO 
THIS DATA SET BY THE ILRSLOTV 
CONSTANT. THE RESULT IS USED TO 
INCREMENT THE AVAILABLE SLOT 
COUNT (ASMBKSLT) . 



OH 



03 



03 



OBTAIN THE LOCAL LOCK SINCE 
ILRAFSOO NEEDS IT WHILE FREEING 
SPACE. LOAD REG 1 WITH THE 
POINTER TO THE RETRIEVED ASPCT 
BASE. SET REG TO THE LENGTH OF 
AN I/O BUFFER. CALL ILRAFSOO TO 
FREE THE BUFFER SPACE. RELEASE 
THE LOCAL LOCK. IF THERE IS A 
NON-ZERO RETURN CODE FROM 
ILRAFSOO ISSUE AN 087 ABEND. 



IF SYS1 .STGINDEX FULL FLAG 
(ASMNOSAV) IS ON IN THE ASMVT, 
TURN THE FLAG OFF. THIS WILL 
ALLOW ASM TO PERFORM SAVE 
OPERATIONS AGAIN. 



IF THE WORK QUEUE (ASMRLGWQ) IS 
NON-ZERO, THEN GO BACK TO STEP 1 
AND REPEAT THE PROCESS FOR THE 
NEXT ACE ON THE WORK QUEUE. 



Routine Label 



ABEND 
ILRAFSOO 



\E 



IF THE REQUEST QUEUE (ASMRLGRQ) 
IS NON-ZERO THEN GO BACK TO STEP 
6 AND REPEAT THE PROCESS FOR THE 
NEXT GROUP OF ACE'S ON THE 
REQUEST QUEUE. 



IF REQUEST QUEUE (ASMRLGRQ) IS 
ZERO, GO BACK TO STEP 4 AND WAIT 
FOR ILRRLG TO SEND SOME MORE 
WORK. 



Routine Label 
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M 



TMRLPME: 
[oT] GET POINTER TO LPME. 

| 02 | INVALIDATE THE LPME. 

| 03 | IF THE LPME I/O ERROR FLAG 
IS OFF, CALL ILRFRSL1 TO 
UPDATE THE PAT. 



CO 



ASM ROUTINE 



| 04 | INCREMENT AN INTERNAL FREE 
SLOT COUNTER. 

I 05 I RETURN TO ILRALSOO. 




1 01 I OBTAIN THE POINTER TO THE LPME 
FROM REG 1 . 

| 02 | TURN OFF THE LPME VALID FLAG 
(ASPLVALD) . 

[olj IF THE LPME I/O ERROR FLAG 

(ASPLIOER) IS OFF, THEN LOAD REG 
1 WITH THE LSID TO BE FREE AND 
CALL ILRFRSL1. ILRFRSL1 WILL 
UPDATE THE APPROPRIATE BIT IN 
THE PAT MAP AND SLOT AVAILABLE 
COUNT (PARESLTA) OF THE 
APPROPRIATE PART ENTRY, THUS 
MAKING THE SLOT AVAILABLE FOR 
FURTHER USE. 

[04] INCREMENT AN INTERNAL FREE SLOT 
COUNTER BY 1. THIS COUNT IS USED 
LATER TO UPDATE THE VIO SLOT 
COUNT IN THE ASMVT. 

fosl RETURN TO ILRALSOO. 
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processing 



Output 



FROM 

ILRACT.ILRSAV 
OR ILRTMRLG 



PTR. 'S'SYM 
BOL OR 




CALL APPROPRIATE 
SUBROUTINE BASED UPON THE 
REQUEST OP-CODE IN THE 
PARAMETER LIST. 01 
-GETASPCT, 02 - PUTASPCT, 
03 6 04 - RETERASE. 



IF THERE IS A NON-ZERO 
RETURN CODE FROM THE 
SUBROUTINE CALLED, ISSUE 
AN 086 ABEND FOR 
RECORDING . 



04 CLEAN-UP. 



05 RETURN TO CALLER. 




05 



USE ILRGMA TO OBTAIN A WORKAREA 
AND RPL BUILD AREA. IF ILRGMA 
CANNOT GET A WORKAREA. RETURN TO 
CALLER WITH A RETURN CODE OF 28. 
SAVE POINTER TO PARAMETER LIST 
IN WORKAREA, GET POINTER TO 
EPATH FROM INPUT PARAMETER LIST. 
RECORD ENTRY INFORMATION IN 
EPATH. RECORD POINTER TO 
WORKAREA IN EPATH. RECOVERY FOR 
ILRVSAMI IS ESTABLISHED BY ITS 
CALLER. 



IF THE REQUEST OP-CODE IS: 01 
CALL GETASPCT TO RETRIEVE THE 
ASPCT FROM SYS1 .STGINDEX: 02 
CALL PUTASPCT TO STORE THE ASPCT 
ON SYS1. STGINDEX: 03 CALL 
RETERASE TO RETRIEVE AND ERASE 
THE ASPCT FROM SYS 1 .STGINDEX FOR 
SAVE LG REQUESTS: 04 CALL 
RETERASE FOR RELEASE LG 
REQUESTS . 



IF THERE IS A NON-ZERO RETURN 
CODE FROM WHICHEVER SUBROUTINE 
WAS CALLED, ISSUE AN 086 ABEND. 



SET THE EPATH POINTER TO THE 
WORKAREA TO ZERO. USE ILRGMA TO 
RETURN THE WORKAREA AND RPL 
BUILD AREA TO ITS POOL. SET THE 
ENTRY INFORMATION IN THE EPATH 
TO ZERO. 



RESTORE REGISTERS AND RETURN TO 
CALLER . 



GETASPCT 
PUTASPCT 
RETERASE 



Diagram 25.19 ILRVSAMI (Part 1 of 1) 
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Output 



L 



fc> 



B 



GETASPCT: 



01 SET THE WORKAREA KEY. 

1 1 WHICH VSAM WILL USE TO 

RETRIEVE THE ASPCT BASE 
FROM SYS1 .STGINDEX. 

I 02 I RETRIEVE THE ASPCT BASE 
1 1 FROM SYS 1 .STGINDEX. 



| 04 | RETRIEVE ANY EXTENSIONS. 



05 IF UNSUCCESSFUL IN 

1 1 OBTAINING ANY OF THE 

EXTENSIONS, FREE ALL I/O 
BUFFERS OBTAINED. 



06 RETURN TO MAINLINE. 





REG 1 






r 






\SPCT 




ASPC 






ASPASSTP 




*• 






ASST 






ASPASSTE 












LPME 















COPY THE 'S' SYMBOL INTO THE 
WORKAREA AND APPEND A FULL WORD 
OF ZEROS TO THE END, THUS MAKING 
THE TWELVE BYTE KEY FOR VSAM. 



CALL INTERNAL SUBROUTINE GETONE 
TO RETRIEVE THE ASPCT BASE FROM 
SYS 1 .STGINDEX. IF THERE IS A 
NON-ZERO RETURN CODE AND AN I/O 
BUFFER WAS OBTAINED ISSUE A 
FREEMAIN TO FREE THE I/O BUFFER. 
AND THEN RETURN TO MAINLINE WITH 
THE RETURN CODE FROM GETONE. 



IF THE ASST EXTENSION COUNT 
TASPAEXCT) IN THE ASPCT BASE IS 
ZERO, THEN RETURN TO MAINLINE. 



04 PROCESS EXTENSIONS. 



inoruLALij , juiu xn£> /tool 
EXTENSION COUNT (ASPAEXCT) IN 
THE WORKAREA. 



ZERO THE LPME AND ASST 
EXTENSION COUNTS IN THE ASPCT 
BASE. 



ZERO THE ASST EXTENSION 
POINTERS (ASPASSTP) IN THE 
ASPCT BASE. 



CALL INTERNAL SUBROUTINE 
GETONE TO RETRIEVE AN ASST 
EXTENSION FROM SYS 1 . STGINDEX . 



IF THERE IS A NON-ZERO RETURN 
CODE FROM GETONE AND AN I/O 
BUFFER WAS OBTAINED, ISSUE A 



FREEMAIN FOR THIS LAST 
BUFFER. ZERO THE EPATH 
POINTER TO THE ASPCT BASE, 
LOAD REG 1 WITH POINTER TO 
ASPCT BASE, SET REG TO 
LENGTH OF BUFFER, CALL 
ILRAFSOO TO FREE ALL THE 
BUFFERS. IF THERE IS A 
NON-ZERO RETURN CODE FROM 
ILRAFSOO, ISSUE AN 087 ABEND. 
RETURN TO MAINLINE WITH THE 
RETURN CODE FROM GETONE. 



ZERO THE LPME EXTENSION 
POINTERS (ASPASSTE) IN THE 
ASST EXTENSION. STORE THE 
PIONTER TO THE ASST EXTENSION 
IN THE ASPCT BASE 
1ASPASSTP (BASE) T . INCREMENT 
THE ASST EXTENSION COUNT IN 
THE ASPCT BASE. DECREMENT THE 
ASST EXTENSION COUNT IN THE 
WORKAREA. 



J. CALL INTERNAL SUBROUTINE 
GETONE TO RETRIEVE AN LPME 
EXTENSION FROM SYS 1 .STGINDEX. 



r\.u j. urv» \~.\jue* c swjn uci x & § AND 

AN I/O BUFFER WAS OBTAINED, 
STORE THE POINTER TO THE LPME 
I/O BUFFER IN THE ASST 
EXTENSION (ASPASSTE (ASST)) 
AND INCREMENT THE LPME 
EXTENSION COUNT (ASPLEXCT) IN 
THE ASPCT BASE. LOAD REG 1 
WITH POINTER TO ASPCT BASE. 
ZERO EPATH POINTER TO ASPCT 
BASE BUFFER. SET REG TO 
LENGTH OF I/O BUFFER. CALL 
ILRAFSOO TO FREE I/O BUFFERS. 
IF THERE IS A NON-ZERO RETURN 
CODE FROM ILRAFSOO, ISSUE AN 
087 ABEND. RETURN TO MAINLINE 
WITH RETURN CODE FROM GETONE. 



STORE POINTER TO LPME 
EXTENSION IN ASST EXTENSION 
TaSPASSTE(ASST)T. INCREMENT 
THE LPME EXTENSION COUNT 
(ASPLEXCT) IN THE ASPCT. 



FREEMAIN 
ILRAFSOO 
ABEND 



Routine Label 
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IF THE LPME EXTENSION COUNT 
IN THE WORKAREA IS ZERO SKIP 
TO STEP 4-0. 



INCREMENT THE ASST EXTENSION 
ARRAY SUBSCRIPT (ASST) . IF WE 
HAVE NOT REACHED THE END OF 
THE ARRAY (ASST > ASPNASST) 
THEN GOTO STEP 41. IF WE HAVE 
REACHED THE END OF THE ARRAY, 
RESET THE SUBSCRIPT TO 
BEGINNING OF ARRAY (ASST=1). 



IF THE WORKAREA ASST 
EXTENSION COUNT IS ZERO, 
RETURN TO MAINLINE. 



P. INCREMENT THE ASPCT BASE 

ARRAY SUBSCRIPT (BASE) . IF WE 
HAVE REACHED END OF ARRAY 
(BASE > 4) THEN RETURN TO 
MAINLINE. IF WE HAVE NOT, 
GOTO STEP 4E. 



THIS STEP IS ALL THE ERROR EXITS 
IN STEP4. 



06 RETURN TO MAINLINE. 



Ref 
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fc> 



I 



01 BUILD THE 12 BYTE KEY FOR 
1 1 VSAM IN THE WORKAREA. 



03 IF THERE ARE NO 

1 ' EXTENSIONS, FREE THE I/O 

BUFFER AND RETURN TO 
MAINLINE. 

I 04 I WRITE ANY ASST AND LPME 

1 ' EXTENSIONS OUT TO 

SYS1 .STGINDEX. 



| 05 | FREE THE I/O BUFFER. 



06 RETURN TO MAINLINE. 



RETURN TO 

ILRVSAMI 

MAINLINE 



B 



01 COPY THE 12 BYTE VSAM KEY FROM 

1 ' THE BASE ASPCT TO THE WORKAREA 

KEY. 



LOAD REG 1 WITH THE POINTER TO 
THE ASPCT BASE. CALL INTERNAL 
SUBROUTINE PUTONE TO WRITE THE 
ASPCT BASE OUT TO SYS 1 .STGINDEX . 
IF THERE IS A NON-ZERO RETURN 
CODE AND STORAGE WAS OBTAINED 
FOR AN I/O BUFFER, ISSUE A 
FREEMAIN TO FREE THE BUFFER, AND 
RETURN TO MAINLINE WITH THE 
RETURN CODE FROM PUTONE. 



IF THE ASST EXTENSION COUNT 
(ASPAEXCT) IS ZERO IN THE ASPCT 
BASE, ZERO THE EPATH POINTER TO 
THE I/O BUFFER, ISSUE A FREEMAIN 
TO FREE THE I/O BUFFER AND 
RETURN TO MAINLINE. 



04 PROCESS EXTENSIONS. 



SAVE THE LPME (ASPLEXCT) AND 
ASST (ASPAEXCT) EXTENSION 
COUNTS IN THE WORKAREA. 



B. GET POINTER TO AN ASST 

EXTENSION FROM THE ASPCT BASE 
(ASPASSTP(BASE) ) . 



COPY THE VSAM KEY FROM THE 
ASST EXTENSION TO THE 
WORKAREA KEY. 



LOAD REG 1 WITH POINTER TO 
ASST EXTENSION AND CALL THE 
INTERNAL SUBROUTINE PUTONE. 



IF THERE IS A NON-ZERO RETURN 
CODE FROM PUTONE, GOTO STEP 
4M. 



-G.-LOAD REG 1 WITH POINTER TO AN- 



LPME EXTENSION 
(ASPASSTE(ASST) ) . COPY THE 
VSAM KEY FROM THE LPME 
EXTENSION TO THE WORKAREA. 
CALL INTERNAL SUBROUTINE 
PUTONE. IF THERE IS A 
NON-ZERO RETURN CODE FROM 
PUTONE, GOTO STEP 4M. 



IF THE WORKAREA LPME 
EXTENSION COUNT IS ZERO, SKIP 



TO STEP 4L. 



IF THE SUBSCRIPT J IS NOT 
GREATER THAN THE NUMBER OF 
ENTRIES IN THE ARRAY 
(ASPNASST) GOTO STEP 4G . IF 
THE END OF THIS ARRAY HAS 
BEEN REACHED, RESET THE 
SUBSCRIPT FOR THE NEXT ASST 
ARRAY. 



IF THE ASST EXTENSION COUNT 
IS NOT ZERO, INCREMENT THE 
BASE ARRAY SUBSCRIPT (BASE) 
AND GOTO STEP 4D. IF THE 
COUNTER IS ZERO, GOTO STEP 5. 



IF AN ERROR OCCURS WHILE 
WRITING ON THE EXTENSIONS, 
ALL THE RECORDS ALREADY 
WRITTEN MUST BE ERASED. AN 
ERASE IS ISSUED AGAINST THE 
CURRENT RECORD AND THE VSAM 
KEY IS DECREMENTED BY ONE. 
THIS PROCESS (ERASE, 
DECREMENT KEY) CONTINUES 
UNTIL THE LAST FOUR BYTES OF 
THE VSAM KEY ARE ZERO. 



SET THE EPATH POINTER TO THE I/O 
BUFFER TO ZERO ISSUE A FREEMAIN 
TO FREE THE I/O BUFFER. 
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ADDR 
r»P T c» 



OF ' S ' SYMBO 



S ' SYMB 



^ 



R 



i 



Output 



01 SET THE WORKAREA VSAM KEY 
1 1 FOR THE ASPCT BASE. 



02 RETRIEVE THE ASPCT BASE 
1 1 FROM SYS1.STGINDEX. 



I 03 I ERASE THE ASPCT BASE FROM 
1 ' SYS1.STGINDEX. 



04 IF THERE ARE NO 

1 ' EXTENSIONS, RETURN TO 

' MAINLINE . 



05 RETRIEVE AND ERASE ALL 
1 • ASST AND LPME EXTENSIONS. 



06 RETURN TO MAINLINE. 



I!z3 



RETURN TO 

ILRVSAMI 

MAINLINE 



B 



THIS SUBROUTINE RETRIEVES AND 
ERASES THE ASPCT FROM 
SYS1.STGINDEX. COPY THE 'S' 
SYMBOL TO THE WORKAREA VSAM KEY. 
APPEND A FULLWORD OF ZEROS, THUS 
MAKING THE 12 BYTE KEY NEEDED 
FOR VSAM RETRIEVED. 



CALL INTERNAL SUBROUTINE GETONE 
TO RETRIEVE THE ASPCT BASE FROM 
SYS1.STGINDEX. IF THERE IS A 
ZERO RETURN CODE, GOTO STEP 3. 
IF THERE WAS A NON-ZERO RETURN 
CODE, SAVE THE RETURN CODE. IF 
STORAGE WAS OBTAINED, ISSUE A 
FREEMAIN TO FREE THE I/O BUFFER. 
LOAD THE SAVED RETURN CODE, AND 
RETURN TO MAINLINE. 



ISSUE AN ERASE FOR THE ASPCT 
BASE. IF THERE IS A ZERO RETURN 
CODE, GOTO STEP 4. IF THERE IS A 
NON-ZERO RETURN CODE, ISSUE A 
SHOWCB TO DETERMINE THE TYPE OF 
ERROR. IF RETRY IS POSSIBLE GO 
BACK AND REISSUE THE ERASE. SET 
THE INTERNAL RETURN CODE TO 4. 



IF THE ASST EXTENSION COUNT 
(ASPAEXCT) IS ZERO, RETURN TO 
MAINLINE. 



05 ASST AND LPME EXTENSIONS: 



SAVE THE ASST (ASPAEXCT) AND 
LPME (ASPLEXCT) EXTENSION 
COUNTS IN THE WORKAREA. ZERO 
THE ASST AND LPME EXTENSION 
COUNTS IN THE ASPCT BASE. 
ZERO THE POINTERS (ASPASSTP) 
TO THE ASST EXTENSIONS IN THE 
ASPCT BASE. RECORD THE 
POINTER TO THE BUFFER ASPCT 
BASE IN THE EPATH. 



SET THE WORKAREA KEY FOR AN 
ASST EXTENSION. CALL INTERNAL 
SUBROUTINE GETONE TO RETRIEVE 
THE ASST EXTENSION FROM 



ERASE 
SHOWCB 



25.19. 
5 



SYS 1 . STGINDEX . IF THERE IS A 
ZERO RETURN CODE FROM GETONE 
SKIP TO STEP 5. 



IF THERE WAS A NON-ZERO 
RETURN CODE FROM GETONE, AN 
I/O BUFFER WAS OBTAINED, AND 
THIS IS A RELEASE 
REQUEST (04), MAKE THE BUFFER 
LOOK LIKE AN ASST EXTENSION, 
AND GOTO STEP 5D. IF THIS WAS 
NOT A RELEASE REQUEST AND 
STORAGE WAS OBTAINED, FREE 
THE ASST EXTENSION BUFFER. 
CALL ILRAFSOO TO FREE THE 
BUFFERS. IF THERE IS A 
NON-ZERO RETURN CODE FROM 
ILRAFSOO, ISSUE AN 087 ABEND 
AND RETURN TO MAINLINE. 



ZERO THE ASST EXTENSION ARRAY 
(ASPASSTE) OF POINTERS TO THE 
LPME EXTENSIONS. STORE THE 
POINTER TO THE ASST EXTENSION 
IN THE ASPCT BASE ARRAY 
(ASPASSTP (I) ) . INCREMENT THE 
ASST EXTENSION COUNT 
(ASPAEXCT) IN THE ASPCT BASE. 
DECREMENT THE WORKAREA ASST 
EXTENSION COUNT. 



E. ISSUE AN ERASE OF THE ASST 
EXTENSION. IF THERE IS A 
NON-ZERO RETURN CODE FROM 
ERASE, ISSUE A SHOWCB TO 
DETERMINE THE TYPE OF ERROR. 
IF RETRY IS POSSIBLE. GO BACK 
AND REISSUE THE ERASE. IF 
RETRY IS IMPOSSIBLE. SET THE 
INTERNAL RETURN CODE TO 4. 



SET THE WORKAREA KEY FOR AN 
LPME EXTENSION. CALL INTERNAL 
SUBROUTINE GETONE TO RETRIEVE 
AN LPME EXTENSION. 



G. IF THERE IS A ZERO RETURN 
CODE FROM GETONE, SKIP TO 
STEP 5S. 



H. IF THERE IS A NON-ZERO RETURN 
CODE AND THIS IS A RELEASE 
REQUEST, SKIP TO STEP 50. 



FREEMAIN 
ILRAFSOO 
ABEND 



ERASE 
SHOWCB 



-I. -IF THERE IS A NON-ZERO RETURN- 
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CODE, THIS IS NOT A RELEASE 
REQUEST. AND STORAGE WAS NOT 
OBTAINED SKIP TO STEP 5K. 



J. IF THERE WAS A NON-ZERO 

RETURN CODE, THIS IS NOT A 

AND STORAGE 



RELEASE REQUEST, ™mi, oit 
WAS OBTAINED. STORE THE 
POINTER TO THE LPME BUFFER IN 
THE ASST EXTENSION ARRAY 
(ASPASSTE(J) ) . ZERO THE EPATH 
POINTER TO THE I/O BUFFER AND 
INCREMENT THE LPME EXTENSION 
COUNT (ASPLEXCT) IN THE ASPCT 
BASE. 



ISSUE AN ERASE OF AN ASST 
EXTENSION. DECREMENT THE ASST 
EXTENSION COUNT. SET THE ASST 
EXTENSION CARRAY SUBSCRIPT 
(J) FOR BEGINNING OF ARRAY. 



INCREMENT THE WORKAREA KEY 
FOR THE NEXT LPME EXTENSION. 
ISSUE AN ERASE OF AN LPME 
EXTENSION. DECREMENT THE LPME 
EXTENSION COUNT IN WORKAREA. 
INCREMENT THE ASST EXTENSION 
SUBSCRIPT. IF THE LPME 
EXTENSION COUNT IS ZERO. SET 
THE RETURN CODE TO 20 AND 
RETURN TO MAINLINE. 



IF THE ASST EXTENSION ARRAY 
SUBSCRIPT HAS NOT REACHED THE 
END OF THE ARRAY GOTO STEP 
5M. IF IT HAS REACHED THE END 
OF THE ARRAY, INCREMENT THE 
WORKAREA KEY FOR THE NEXT 
ASST EXTENSION AND GOTO STEP 
5L. 



LPME EXTENSION BUFFER. 
DECREMENT THE LPME EXTENSION 
COUNT. 



IF THE LPME EXTENSION COUNT 
IS ZERO, GOTO STEP 51. 



STORE THE POINTER TO THE LPME 
EXTENSION BUFFER IN THE ASST 
EXTENSION ARRAY 
(ASPASSTE(J) ) . ZERO THE EPATH 
POINTER TO THE I/O BUFFER. 
INCREMENT THE LPME EXTENSION 
COUNT IN THE BASE (ASPLEXCT) . 
DECREMENT THE LPME EXTENSION 
COUNT. 



S. ISSUE AN ERASE OF AN LPME 

EXTENSION. IF THERE IS A ZERO 
RETURN CODE FROM ERASE GOTO 
STEP 5P. 



SHOWCB TO DETERMINE THE 
ERROR. IF A RETRY IS 
POSSIBLE. GO BACK TO STEP 5T 
TO REISSUE THE ERASE. IF 
RETRY IS NOT POSSIBLE. SET 
THE INTERNAL RETURN CODE TO 4 
AND GOTO STEP 5P. 



06 RETURN TO MAINLINE. 
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R 



FROM PUTASPCT 

(ILRVSAMI 

SUBROUTINE) 



Ob 



J01| OBTAIN AN I/O BUFFER. 



[02 | BUILD THE RPL PUTONEA 
ENTRY POINT. 

| 03 ) COPY THE ASPCT OR 

EXTENSION TO BUFFER. 

| 04 | CALL VSAM TO WRITE THE 
BUFFER OUT TO 
SYS1.STGINDEX. 

I 05 I RETURN TO CALLER. 



^> 



B 



[01 I ISSUE A GETMAIN TO OBTAIN A 2K 
I/O BUFFER. IF THERE IS A ZERO 
RETURN CODE FROM GETMAIN SAVE 
THE POINTER TO THE BUFFER AND 
RECORD THE POINTER IN THE EPATH. 
IF THERE IS A NON-ZERO RETURN 
CODE FROM GETMAIN, SET THE 
RETURN CODE TO 28, AND RETURN TO 
CALLER . 

[02] ISSUE A GENCB TO BUILD THE RPL 

FOR A VSAM PUT REQUEST. IF THERE 
IS A NON-ZERO RETURN CODE FROM 
GENCB, SET THE RETURN CODE TO 20 
AND RETURN TO CALLER. 

[03] PUTONEA ENTRY POINT. COPY THE 

ASPCT BASE, OR ASST EXTENSION OR 
LPME EXTENSION TO THE GETMAINED 
I/O BUFFER. 

1 04 1 ISSUE A VSAM PUT TO WRITE THE 

I/O BUFFER OUT TO SYSl .STGINDEX. 
IF THERE IS A NON-ZERO RETURN 
CODE FROM PUT, ISSUE A SHOWCB TO 
DETERMINE THE ERROR. IF WE CAN 
RETRY, GO BACK AND REISSUE THE 
PUT. IF STGINDEX IS FULL, SET 



PUT 
SHOWCB 



THE RETURN CODE TO 24, 
OTHERWISE, SET THE RETURN CODE 
TO 20. RETURN TO CALLER. 

SET THE RETURN CODE TO ZERO AND 
RETURN TO CALLER. 



Diagram 25.19.4 PUTONE (Part 1 of 1) 
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V i34.UJ.OV / 



Input 



Processing 



FROM GETASPCT 
OR RETERASE 
(ILRVSAMI 




Output 



GETONE: 
|01| OBTAIN AN I/O BUFFER. 

I 02 I BUILD THE RPL. 



| 03 | CALL VSAM TO RETRIEVE THE 
RECORD FROM SYS1 .STGINDEX. 



1 04 1 RETURN TO CALLER WITH 
RETRIEVED RECORD. 



RETURN TO 
GETASPCT OR 
RETERASE. 




OBTAIN THE LOCAL LOCK AND ISSUE 
A GETMAIN FOR A 2K BUFFER TO BE 
USED FOR VSAM I/O. RELEASE THE 
LOCAL LOCK. IF THERE IS A 
NON-ZERO RETURN CODE FROM 
GETMAIN, SET THE RETURN CODE TO 
28 AND RETURN TO CALLER. IF 
THERE IS A ZERO RETURN CODE, 
SAVE THE POINTER TO THE 
GETMAINED AREA AND RECORD IT IN 
THE EPATH. IF THE INTERNAL RPL 
BUILT FLAG IS ON SKIP TO STEP 3 . 

ISSUE A GENCB TO BUILD AN RPL 
FOR A GET REQUEST FROM VSAM. IF 
THERE IS A NON-ZERO RETURN CODE 
FROM GENCB, SET THE RETURN CODE 
TO 20 AND RETURN TO CALLER. IF 
THERE WAS A ZERO RETURN CODE SET 
THE INTERNAL RPL BUILT FLAG. 

ISSUE A VSAM GET PASSING THE 
RPL. IF THERE IS A NON-ZERO 
RETURN CODE FROM GET, ISSUE A 
SHOWCB TO DETERMINE THE TYPE OR 
ERROR. IF IT WAS RECORD NOT 
FOUND, SET THE RETURN CODE TO 08 
AND RETURN TO CALLER. IF THE 
ERROR WAS ONE OF THE RETRYABLE 



SETLOCK 
GETMAIN 



ERRORS, GO BACK AND REISSUE THE 
GET. IF IT WAS NOT ONE OF THE 
RETRY ERRORS, SET THE RETURN 
CODE TO 20 AND RETURN TO CALLER. 

[04] SET RETURN CODE TO 0, AND RETURN 
TO CALLER. 



Label 



Ref 



Diagram 25.19.5 GETONE (Part 1 of 1) 
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Recovery 

ASM Recovery provides the mechanism to handle 
any errors that occur during normal ASM 
processing. Errors are classified into two groups. 
First, there are the errors in mainline processing 
that are detected during normal execution. These 
errors, sometimes referred to as determinate errors, 
normally do not prevent continuation of the ASM 
process in progress. The errors are recorded in 
SYSl.LOGREC and mainline processing resumes. 

The second group of errors are the unexpected, 
or indeterminate errors. ASM Recovery itself first 
detects these errors. ASM Recovery attempts to 
determine the severity of the error in terms of the 
extent of damage to ASM control blocks and/or 
code and to the process in progress at the time of 
the error. Appropriate action is then taken. 
Possible actions that may be taken include 
recording the error with module identification and 
appropriate ASM status information, clean-up of 
ASM resources where possible, converting the error 
to a failure indication such as a return code to the 
caller of ASM, and terminating a task or address 
space if necessary. 

For recovery purposes, ASM code has been 
divided into functional areas. Each recovery routine 
has primary responsibility for the mainline code it 
covers. 

The functional areas of recovery are: 

• I/O Control Modules and Page Operations 
Starter (ILRPOS) 

Swap Modules (ilrswap, ilrswpdr) 
I/O Subsystem — front end (ILRPTM, 

ILRSRT) 

I/O Subsystem — back end (ILRCMP) 

Group Operations Starter (ILRGOS) and vio 

Group Operators 

SRB Controller (ILRSRBC) 

Task Mode Release Processing (ilrtmrlg) 

Message Module (ILRMSGOO) 

Address Space Termination (ilrtermr) 

Job Termination (ILRJTERM) 

Page Expansion (ILRPGEXP) 

Special I/O to Page Data Sets (ilrpread) 

The ASM recovery environment is established via 
the setfrr or estae macro. The task mode 
release processing recovery environment is 
established during system initialization and is 
always present. Issuance of the SETFRR or esate 
macro is held to a minimum to allow maximum 
recovery coverage with minimum overhead. 
Recovery environments are established only at 
external entry points to ASM. 



Mainline ASM processing is tracked via the new 
ASM Tracking Area (ATA) and the Recovery Audit 
Trail Area (EPATH). The ATA is mapped onto the 
24-byte area returned by the SETFRR macro. The 
module establishing the recovery environment 
dynamically obtains the EPATH. The ATA and 
EPATH will contain module, CSECT, and entry 
point data in addition to other data required for 
error recovery processing. 

I/O Control Modules and Page Operation 
Starter (ILRPOS) 

The I/O control FRR (ilriofrr) is the routine 
RTM calls whenever an error is encountered during 
ASM's swap processing, initial page processing, or 
page completion processing. This FRR is placed on 
the current stack if: 

• ILRSWAP, ASM's swap controller, has been 
called by RSM; 

• ILRPAGIO, ASM's page I/O controller, has 
been called by RSM or by ILRSWAP on a 
swap out request; 

• ILRTRPAG (entry point in ILRPOS), ASM's 
transfer page routine, has been called by 
RSM; 

• ILRPAGCM, ASM's page completion controller, 
has been called by the I/O subsystem for 
notification of I/O completion, or by the VIO 
SRB Controller and the front end of the I/O 
subsystem to handle errors; 

• ilrswpdr, ASM's swap driver, has been 
scheduled to start I/O to a swap data set. 

The FRR consists of a mainline router and 
recovery subroutines for each of the ASM functions 
covered. The mainline receives control from RTM 
on an error. At this time, the SDWA contains 
information about the error, such as error type 
(program check, machine check, etc.), registers and 
PSW at the time of the error, and information 
about the mode of the system at the time of the 
error. The SDWA also contains the address of the 
ATA, the ASM tracking area mapped to the 
six-word parameter area provided by SETFRR. The 
mainline of the FRR uses the tracking information 
in the ATA to determine which ASM function was 
in control at the time of the error and then gives 
control to the recovery subroutine for this function. 
The mainline first performs common verifications 
and set up for the recording of the error. The 
functions identified in the mainline of this FRR 
include: 

• ILRQIOE 

• ILRSLSQA 
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SWAPCOMP subroutine of ILRPAGCM 

ILRVIOCM 

PAGECOMP subroutine of ILRPAGCM 

ILRPOS 

ILRPAGIO 

ILRPAGCM 

ILRSWAP 

ilrtrpag (entry point in ILRPOS) 

ILRSWPDR 

Each recovery subroutine attempts recovery 
and/or clean-up of its resources and, if retry is 
desired, places the retry address in the SDWA. In 
the cases of ilrslsqa, ilrswap, and ilrswpdr, 
the subroutine calls one of the entries in ILRSWP01 
to do the recovery. Some common clean-up is also 
performed in the mainline. The mainline completes 
the set-up for retry if retry has been requested. 

Recovery for ILRQIOE begins by validity-checking 
the ASMSTAGQ and the AIA checkpointed in the 
ATA. If this AIA is valid, it is marked with the 
indeterminate error flag and queued to the AIA 
error queue in the PART. Any work already queued 
to the temporary write queques is then queued to 
the part write queues. Finally, Part Monitor 
(ILRPTM) is scheduled if it is not already 
scheduled. The retry point is set to return to the 
caller. 

Recovery for the SWAPCOMP subroutine of 

ILRPAGCM begins by validity-checking the 
SARWAITQ and the queue of remaining AlAs 
checkpointed in the ATA. If the AIA in the ATA is 
valid and is for a swap-in request, it is marked with 
the indeterminate error flag and queued to the 
internal PIOPQ (the internal queue of AlAs to be 
given to module ieavpiop). The asmiorqc count 
is also increased. If the AIA is valid and is for a 
swap-out request, the AIA is marked with the 
indeterminate error flag and queued to the 
ashcapq. Because an indeterminate error has 
occurred, the address space is then terminated. 
Retry is not attempted. 

Recovery for ILRVIOCM begins by a 'TRAS' back 
to the current address space. The AIA checkpointed 
in the ATA is then validity checked. This AIA, or its 
related ACE, is dequeued from the LGEPROCQ. The 
SRB Controller is scheduled and the ASM class lock 
is freed, if held. Retry is not attempted. Recovery 
processing is completed by recovery for the 
PAGECOMP subroutine of ILRPAGCM. 



Recovery for the PAGECOMP subroutine of 

ILRPAGCM begins by a 'TRAS' back to the current 
address space. On a 'TRAS' error, the address space 
involved is terminated. The in-process AIA queue, 
pointed to by the AIA checkpointed in the ATA, is 
validity checked. If the AIA in the ATA is valid, it 
is marked with the indeterminate error flag and 
queued to the internal PIOPQ (the internal queue of 
AlA's to be given to module IEAVPIOP). The 
ASMIORQC count is also increased. Retry is 
attempted when Recovery determines that 
ilrslsqa can be called. 

Recovery for ILRPOS begins by validity-checking 
the AIA/ ACE checkpointed in the ATA. If it is a 
valid AIA, it is dequeued from the ASMSTAGQ, the 
ASMIORQR count is decreased, and the AIA is 
marked with the indeterminate error flag. If the 
ASM lock is held, the LGEPROCQ is validity 
checked and the AIA/ ACE is dequeued from it. The 
ASM lock is freed if held. The retry point is set so 
that return is to the caller. 

Recovery for ILRPAGIO begins by 
validity-checking the AIA checkpointed in the ATA. 
If this AIA is valid, it is marked with the 
indeterminate error flag and its address is placed in 
the work area for return to RSM. If the AIA is on 
the ASMSTAGQ, it is dequeued and the ASMIORQR 
count is decreased. The retry point is set to call 

ILRQIOE. 

Recovery for ILRTRPAG entry point of ILRPOS 
begins by validity-checking the ACE checkpointed 
in the ATA. If it is a valid ACE, it is returned to its 
cell pool. If there is a related AIA, it is 
disconnected from the ACE. Retry is not attempted. 

Recovery for ILRPAGCM is contained in the 
clean-up processing performed for all routines on 
the ILRPAGCM path. This clean-up consists of first 
placing any unprocessed AlAs on the AIA error 
queue in the PART and then scheduling Part 
Monitor (ilrptm) to process these aias. The 
clean-up then attempts to return any completed 
aias to RSM either by retrying at the call to 
ieavpiop (if retry is permitted) or by calling 
IEAVPIOP directly. 

Swap Modules (ILRSWAP, ILRSWPDR) 

ILRIOFRR passes control to swap recovery 
(ilrswpoi) to process errors that occur in ASM's 
swapping path. This module has three entry points: 
ilrswpoi for swap driver recovery, ILRCSWAP for 
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front end swap processor recovery, and ILRCSLSQ 
for swap LSQA processor recovery. 

Recovery for ILRSWPDR 

Swap driver recovery processes all errors that occur 
in ASM's swap driver, ILRSWPDR, as non-retryable. 
All swap recovery routines receive control from 
ILRIOFRR. The control blocks associated with the 
error are validity-checked. Unprocessed swap sets 
are returned to work queues for future processing. 
Resources such as the IORB are freed. If a SARTE 
has been checkpointed by swap driver, it is 
unlocked. Swap driver's SRB is rescheduled to 
ensure continuity for ASM swap processing. There 
is special processing that will rebuild one IORB and 
chain it to the SARTE when a SARTE's last IORB 
fails validity checking or when processing an 
ASM-issued '084' abend. A SARTE (swap data set) 
is unusable without an IORB. 

Recovery for BLRSWAP 

Swap processor recovery processes all errors which 
occur in ASM's swap processor, ILRSWAP. The 
ASMHD swap queue is validity checked. Since the 
swap request being processed has not yet been 
merged with other swap requests on ASM's internal 
queues, a retry is set up into ILRSWAP to return 
this swap request to RSM. 

Recovery for ILRSLSQA 

Swap LSQA recovery processes all errors that occur 
in ASMs swap LSQA processor, ILRSLSQA. It is 
convenient to identify three stages of swap 
processing: AlAs on the ASMHD swap queue, 
essentially just starting swap processing; AlAs on 
the SART wait queue, grouped for SWAP processing 
and containing assigned LSlDs; and single AlAs 
connected to sccws ready to be sent to the swap 
driver for I/O processing. 

Swap LSQA recovery identifies the stage of 
processing at the time of error and validity-checks 
the control blocks and queues being processed. The 
swap AlAs are returned to the appropriate queues 
or to RSM via address space termination if the error 
precludes the successful completion of the swap 
request. Unused SCCWs are returned to the SARTE 
SCCW available queue. The retry address and 
registers are set up in the SDWA at a point in 
ILRSLSQA where swap AlAs returned to queues by 
recovery are reprocessed. 



I/O Subsystem — Front End (ILRPTM, 
ILRSRT) 

ILRSRT01 is the FRR for both ILRPTM and ILRSRT. 
It is made active by ILRPTM and it remains active 
until ilrsrt and ILRPTM processing is complete 
and ILRPTM deletes it. The major objective of this 
FRR is to get rid of invalid or loop-causing control 
blocks that ILRPTM and ILRSRT were using at the 
time of the error that caused ILRSRT01 to be 
invoked. Another objective is to restructure the 
environment so that any remaining requests will be 
properly processed by ILRPTM and ILRSRT. 

I/O Subsystem — Back End (ILRCMP) 

ILRCMP01 is the recovery routine for ILRCMP, the 
I/O completion routine. I/O completion consists of 
four entry points — ILRCMPDI, the DIE exit; 
ILRCMPAE, the abnormal end appendage; 
ilrcmpne, the normal end appendage; and 
ILRCMP, the termination routine. The recovery 
routine attempts to clean up whatever resources 
have been checkpointed in the ATA and force 
reprocessing for any requests not yet attempted. 
For ILRCMP, the termination routine, the SRB is 
scheduled so that ILRCMP can complete its 
processing. For the other entry points (ILRCMPDI, 
ilrcmpne and ilrcmpae), percolation causes the 
IOS FRR to get control and force a X'45' to the 
termination routine. 

Group Operation Starter (ILRGOS) and VIO 
Group Operators 

ILRGOS01 is the recovery routine for ILRGOS and 
its paths to VSAM; ILRGOS calls the group 
operators ILRSAV, ILRRLG, and ILRACT, which call 
ILRVSAMI. ILRGOS01 serves as an ESTAE for Save 
and Activate requests and an FRR for Release 
Logical Group and Assign requests. It only retries 
for record-only abends. For all other errors, the 
resources are freed and the error percolated. 
Eventually ILRJTERM will clean up at job 
termination and ILRTERMR will clean up at address 
space termination. 

If the error occurred during an Assign request, 
any storage obtained on behalf of the request is 
freed. Since no ACE is created for the Assign 
request, there is no trace of the request once 
recovery has completed. Percolation to VBP allows 
VBP to take care of the ACA. 

If the error occurred during an Activate request, 
any storage obtained on behalf of the request is 
freed. The ACE is returned to the pool and there is 
no trace of the request once recovery has 
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completed. Percolation to vbp allows vbp to take 
care of the ACA. 

If the error occurred during a Release Logical 
Group request, the work-pending flag in the lge is 
turned off. ilrsrbc does not look at this lge 
because the work-pending flag is off. ILRJTERM 
does not process this LGE because the Release 
Logical Group flag in the LGE remains on. 
ILRTERMR gets control at memory termination and 
cleans up resources for the ASPCT. If the ASPCT 
had been saved, a Release Logical Group request is 
queued to ILRTMRLG's request queue in the 

ASMVT. 

If the error occurred during a Save request, all 
LPME's are marked as unsaved if EPAUNSAV is on 
or if the save flag in the ASPCT is off. This allows 
slots to be freed up during later clean-up 
processing. If the save flag is off in the ASPCT, the 
'S' symbol is set to zero so that a later release 
request for the LGE will be honored. The ACE is 
dequeued from the LGE so that there is no trace of 
this Save request. The work-pending flag in the 
LGE is turned off if there is no remaining work on 
the LGE. The Save-request-queued flag in the LGE 
is turned off if there are no more Save requests 
queued for this LGE. The 
group-operations-in-process flag in the LGE is 
turned off. The ACA is then returned to the 
available pool. Further processing can be done for 
this LGE and ILRJTERM issues a Deactivate request 
for this LGE at job termination in order to clean 
up. 

SRB Controller (ILRSRBC) 

SRB Controller Recovery (ILRSRB01) processes all 
errors that occur in ASM's SRB Controller, ILRSRBC, 
or in either of the two ILRPOS subroutines 
(ILRESTRT and ILRTRANS), or in ILRRLG when 
called by ILRSRBC. The internal queues of AlAs and 
ACEs, and the ASM Header LGE queue are 
validity-checked. Startable AlAs and group 
operation ACEs are set up for reprocessing by the 
SRB controller. The ATA, which checkpoints critical 
ASM control blocks, is copied into the SWDA. 
Resources such as iLRSRBC's and iLRRLG's 
workarea cells are freed. SRB controller's SRB is 
rescheduled to ensure continuity for asm 
processing in the address space. 

The only 'non-retryable' error is one that causes 
truncation of the ASM Header LGE queue. Because 
the extent of damage cannot be ascertained and 
ASM cannot handle future requests for the missing 
LGES, the address space is terminated. 



Task Mode Release Processing (ILRTMRLG) 

ILRTMI01, an estae established in ILRTMRLG, is 
basically recovery for two mainline functions — 
processing in ILRTMI00 to complete ASM 
initialization and processing in ILRTMRLG to erase 
saved ASPCTs from SYSl.STGlNDEX and release the 
slots assigned to the ASPCTs. 

If ILRTMI01 is entered due to a failure in 
ILRTMI00, retry is attempted at the next logical 
process in ilrtmioo. If, however, rtm does not 
pass an sdwa to ilrtmioi, then the system is in 
serious condition since it cannot get 512 bytes of 
storage (the size of an SDWA) when very few or 
no other system functions are concurrently 
executing. In this case ilrtmioi percolates, causing 
the Master Scheduler Initialization Task to 
terminate the ipl. 

If the error occurred while the ILRTMRLG main 
function was executing, every effort is made to 
keep the task for ILRTMRLG from being 
terminated, since this task is initiated only once per 
ipl. Retry in this case is always into ILRTMRLG 
where it will get the next work element (ACE) off 
its queue, if there is one, or go into its normal wait, 
waiting for more work to be queued. 

If the error occurred in ILRVSAMI (called by 
ILRTMRLG), the retry is made into ILRTMRLG, 
unless it is a record-only abend situation, in which 
case the retry is made into ILRVSAMI. 

Message Module (ILRMSG00) 

ILRMSG01 gets control when an error occurs in the 
ILRMSG00 system termination subroutine. ILRMSG01 
loads a wait state PSW. 

Address Space Termination (ILRTERMR) 

TERMFRR is the recovery routine for ILRTERMR. If 
ILRTERMR got an error while working on a queue 
it calls the appropriate queue verification routine. If 
retry is possible, TERMRFRR attempts to retry at 
the next retry point in the module. 

Job Termination Resource Manager 
(ILRJTERM) 

ILRJTM01 is the recovery FRR for ILRJTERM. The 
error is recorded in SYSl.LOGREC. If the error is 
retryable, a retry is requested at a point in 
ILRJTERM where an SRB for ILRSRBC is scheduled 
to the address space owning the VIO data set. 
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Page Expansion (ILRPGEXP) 

ESTAER is the recovery routine for ILRPGEXP. It 
gets control on errors from ILRPGEXP mainline, 
ILROPS00 or ILRPREAD. If the error occurred while 
reading or writng ILRTPARB a message is sent to 
the operator. In all cases control blocks are cleaned 
up and freed. 

Special I/O to Page Data Sets (ILRPREAD) 

estaexit gets control if an error occurs while 
ILRPREAD is trying to read or write the ILRTPARB. 
ESTAEXIT frees storage obtained from SQA and 
returns to RTM. RTM will then give control to 
ESTAER, the ESTAE routine for- ilrpgexp. 

Recovery Service Routine Module 
(ILRFRR01) 

The FRR service routine module contains routines 
used by the other ASM recovery routines. There are 
three types of service routines contained in this 
module: 1) queue verfication routines, 2) control 
block verification routines, and 3) a PURGEDQ 
resource manager termination routine. The 
verification routines verify (and correct, when 
possible) queues and control blocks that might 
have been affected by an error that occurred 
during ASM's processing. This prevents an invalid 
queue or control block from possibly causing 
another error during later ASM processing. The 
following queues have been identified for 
verification in the case of an error: the ASM staging 
queue (ASMSTAGQ), and LGE process queue 
(LGEPROCQ), the SART wait queue (SARWAITQ), a 
queue of AlA's, a queue of swap AlAs, a queue of 
SCCWs, a queue of PCCWs, the RSM local I/O queue 
(RMSLIOQ — a queue of PCBs), a queue of ACEs, 
and a queue of lOEs. The following control blocks 
have been identified for verification: the AIA, the 
ACE, the LGE, the PCB, the SCCW, the PCCW, the 
IOE, and the iorb-iosb-srb combination. 

The queue verification routines all have similar 
methods of operation. They all use the general 
supervisor queue verification routines to actually 
verify and correct the queue. Thus, each asm 
queue verification routine initializes the parameter 
list for the general queue verifier with those 
parameters applicable to its particular queue. The 
appropriate queue verifier entry point is then 
called. There is one queue verifier for each type of 
queue verified: 1) a single-threaded, single-headed 



queue, 2) a single-threaded, double-headed queue, 
and 3) a double-threaded, double-headed queue. 

The PCB/AIA verification routine begins by 
checking that the PCB/AIA can be referenced. Then 
the storage pointed to by PCBASCB checked to see 
if it can be referenced. Finally, AIAOP is tested for 
the correct operations code (X'00'). 

The ACE verification routine begins by checking 
that the ACE can be referenced. Then the storage 
pointed by acelge is tested to check that it is a 
valid LGE. Finally, a test is made to check that the 
LGID in the ACE matches the LGID in the LGE. 

The LGE verification routine begins by checking 
that the LGE can be referenced. Then the value of 
LGELGID is tested to ensure that it is less than the 
maximum LGVMAXLG. Finally, a test is made to 
check that LGVTE indexed by the LGID does point 
to the LGE. 

The sccw verification routine begins by 
checking that the SCCW can be referenced, is in the 
nucleus buffer area, and contains the SCCW 
identifier. Then tests are made to check that 
SCCWSEEK contains the seek command code and 
that SCCWSSEC contains the set-sector command 
code. 

The PCCW verification routine begins by 
checking that the PCCW can be referenced, is in 
the nucleus buffer area, and contains the PCCW 
identifier. Then, tests are made to check that 
PCCWSRCH contains the TIC command code. 

The IOE verification routine begins by checking 
that the IOE can be referenced. Then the value of 
ioeaia is tested. If it is non-zero, the AIA 
verification routine is used to check that the 
storage is a valid AIA. 

The iorb-iosb-srb verification routine begins by 
checking that the IORB-IOSB-SRB combination can 
be referenced. Then the IORB storage is checked 
for the IORB identifier and to ensure that 
IORPARTE points to a valid parte. Finally, the 
IOSB storage is checked for the correct driver id 
and the correct ASID. If all verifications are 
successful, the constant fields in the IORB-IOSB-SRB 
are refreshed. 

The PURGEDQ resource manager termination 
routine protects the SRBs for Part Monitor and 
Swap Driver by rescheduling them if they are ever 
purged. 
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Type of Recovery 


Recovery Routine 


Code Covered 


FRR 


ILRCMP01 

ILRGOS01 1 

ILRGOS01 1 

ILRIOFRR 

ILRIOFRR 

ILRIOFRR 

ILRCQIOE (ILRIOFRR entry) 

ILRIOFRR 

ILRJTM01 2 

ILRMSG01 2 

ILRSRB01 

ILRSRT01 

ILRSRT01 

ILRSWP01 

ILRCSLSQ0LRSWPO1 entry) 

ILRCSWAP (ILRSWP01 entry) 

TERMRFRR 2 


ILRCMP 

ILRGOS 

ILRRLG 

ILRPAGCM 

ILRPAGIO 

ILRPOS 

ILRQIOE (ILRPAGIO entry) 

ILRVIOCM 

ILRJTERM 

ILRMSGOO 

ILRSRBC 

ILRPTM 

ILRSRT 

ILRSWPDR 

ILRSLSQA (ILRSWAP entry) 

ILRSWAP 

ILRTERMR 


ESTAE 


ESTAER 2 

ESTAEXIT 2 

ILRGOS01 1 

ILRGOS01 1 

ILRTMI01 


ILRPGEXP 

ILRPREAD 

I LR ACT and ILRVSAMI 

ILRSAVand ILRVSAMI 

ILRTMRLG and ILRVSAMI 


1 1 LRGOS01 is both an FRR and an ESTAE. 
2 
An alternate entry within the module, for which it provides recovery. The MO is with 

this module's MO, not with the group of recovery routine MOs. 



Figure 2-60A. Recovery Routines 
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Recovery 



25.20 



I/O Control 

Recovery 

(ILRIOFRR) 



25.20.1 



Queue I/O 

Recovery 

(ILRCQIOE) 



25.22 



I/O Subsystem 

Recovery 

(ILRSRT01) 



25.21 



Swap Driver 

Recovery 

(ILRSWP01) 



25.21.1 



Swap Recovery 
(ILRCSWAP) 



25.21.2 



Swap LSQA 

Recovery 

(ILRCSLSQ) 



25.24 



Group Operation 

Recovery 

(ILRGOS01) 



25.23 



I/O Completion 

Recovery 

(ILRCMP01) 



\r u 



25.26 



Task Mode 

Recovery 

(ILRTMI01) 



25.25 



SRB Controller 

Recovery 

(ILRSRB01) 



25.27 



Control Block 
and Queue Verifiers 
(ILRFRR01) 



25.27.1 



Initialize Staging 
Queue Verifier 
(ILRVASGQ) 



25.27.2 



Initialize LGE 
Process Queue 
Verifier 
(ILRVLPRQ) 



25.27.3 



Initialize SART 
Wait Queue 
Verifier 
(ILRVSWTQ) 



25.27.4 



Initialize AIA 
Queue Verifier 
(ILRVAIAQ) 



25.27.5 



Initialize 
SCCW Queue 
Verifier 
(ILRVSCWQ) 



25.27.6 



25.27.7 



25.27.8 



25.27.9 



Initialize Swap 
AIA Queue 
Verifier 
(ILRVSPAQ) 



Initialize IOE 
Queue Verifier 
(ILRVIOEQ) 



Compare 
A I A/ACE 
(ILRVAIAC) 



Verify AIA 
(ILRVAIA) 



25.27.9 



25.27.10 



25.27.11 



25.27.12 



25.27.13 



25.27.14 



Verify PCB 
(ILRVPCB) 



Verify ACE 
(ILRVACE) 



Verify LGE 
(ILRVLGE) 



Verify SCCW 
(ILRVSCCW) 



Initialize PCCW 
Queue Verifier 
(ILRVPCWQ) 



Verify PCCW 
(ILRVPCCW) 



25.27.15 



25.27.16 



25.27.16 



25.27.17 



25.27.18 



25.27.19 



Initialize PCB 
Queue Verifier 
(ILRVPCBQ) 



Initialize ACE 
Queue Verifier 
(ILRVACEQ) 



Initialize ACE 
Queue Verifier 
(ILRVACQ2) 



Verify IORB 
(ILRVIORB) 



Verify IOE 
(ILRVIOE) 



Reschedule 
ILRPTMor 
ILRSWPDRSRB 
(ILRPSRMT) 



25.x. - Module 

25.x.y. — Entry point in module 25.x. 

Figure 2-61. Recovery Overview 
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Input 



Processing 




Output 



ILRIOFRR: 
| 01 | ASM I/O CONTROL RECOVERY. 

1 02 j SET UP COMMON REGISTER 
INTERFACE FOR RECOVERY 
SUBROUTINES AND PERFORM 
COMMON INITIALIZATION. 

| 03 | DETERMINE WHICH ROUTINE 

WAS IN CONTROL AT THE TIME 
OF ERROR AND ROUTE CONTROL 
TO THIS ROUTINE'S RECOVERY 
CODE. 

A. QIOE RECOVERY 

B. SLSQA RECOVERY 

C. SWAPCOMP RECOVERY 

D. VIOCM RECOVERY 

E. PAGECOMP RECOVERY 

F. POS RECOVERY 

G. PAGIO RECOVERY 
H. SWAP RECOVERY 
I. TRPAG RECOVERY 
J. SWPDR RECOVERY 











|reg 1 


|r 


^h>ur*t\ 






SDWAMODN 


SDWACSCT 


SDWAREXN 




SDWAVRA 






| REG 3 


ll 


ASMVT 






"* 


I 




| REG 4 


h 


ATA 






* 


I 




| REG 8 


h 


WORK AREA 






* 


I 




| REG 9 


ll 


DATA AREA 






"* 


I 





ILRIOFRR IS CALLED BY RTM 
ANYTIME AN ERROR OCCURS DURING 
ASM'S SWAP PROCESSING, INITIAL 
PAGE PROCESSING, AND PAGE 
COMPLETION PROCESSING. ILRIOFRR 
CALLS ILRSWP01 IF THE ERROR 
OCCURRED DURING SWAP PROCESSING. 
OTHERWISE, ILRIOFRR CALLS 
INTERNAL SUBROUTINES. 

PLACE NECESSARY POINTERS IN 
REGISTERS TO STANDARDIZE THE 
INTERFACE TO THE RECOVERY 
SUBROUTINE. INITIALIZE THE 
PARAMETERS FOR RECORDING AND 
COPY THE FRR PARAMETER AREA, THE 
ATA, INTO THE VARIABLE RECORDING 
AREA SO THAT THE ATA AT THE TIME 
OF THE ERROR IS RECORDED. ALSO 
PERFORM VERIFICATION OF COMMON 
QUEUES . 

THE FRR USES THE SECTION FLAGS 
IN THE ATA TO DETERMINE WHICH 
ROUTINE WAS IN CONTROL AT THE 
TIME OF THE ERROR. THE FLAG IS 
TURNED ON WHEN THE ROUTINE IS 
ENTERED, AND OFF WHEN THE 
ROUTINE EXITS. THE SECTION FLAGS 



ARE TESTED IN THE REVERSE OF THE 
ORDER IN WHICH THE ROUTINES ARE 
CALLED TO DETERMINE WHICH 
ROUTINE WAS 'CURRENT' WHEN THE 
ERROR OCCURRED. 

A. INVOKE ILRQIOE RECOVERY. 

B. INVOKE ILRSLSQA RECOVERY. 

C. INVOKE SWAPCOMP RECOVERY. 

D. INVOKE ILRVIOCM RECOVERY. 

E. INVOKE PAGECOMP RECOVERY. 

F. INVOKE ILRPOS RECOVERY. 

G. INVOKE ILRPAGIO RECOVERY. 
H. INVOKE ILRSWAP RECOVERY. 
I. INVOKE ILRTRPAG RECOVERY. 
J. INVOKE ILRSWPDR RECOVERY. 



ILRCQIOE 

ILRCSLSQ 

RECSCOMP 

RECVIOCM 

RECPCOMP 

RECPOS 

RECPAGIO 

ILRCSWAP 

RECTRPAG 

ILRSWP01 



Diagram 25.20 ILRIOFRR (Part 1 of 2) 
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Input 



Processing 



Output 



PERFORM CLEAN-UP FOR 
ERRORS DURING ILRPAGCM 
PROCESSING. 

A. QUEUE UNPROCESSED AIA'S- 
TO THE PART AIA ERROR 
QUEUE AND SCHEDULE THE 
SRB FOR PART MONITOR. 

B. RETURN COMPLETED AIA'S - 
TO RSM BY RETRYING TO 
CALL IEAVPIOP OR BY 
CALLING IEAVPIOP 



T^> 



DIRECTLY. 



CO 



RSM ROUTINE 



RETURN TO RTM WITH 
INDICATION OF RETRY OR 
CONTINUE WITH 
DETERMINATION. 



lU 



ASMVT 


PART 




ASMPART 


J - *" 






PARTAIAE 















| REG 1 | 



SDWA 


' 






SDWARTYA 







| REG 1 



PERFORM COMMON CLEAN-UP IF RETRY 
HAS NOT BEEN REQUESTED OR IF 
RETRY IS NOT ALLOWED. 

A. COLLECT ANY UNPROCESSED AIA'S 
FROM THE ATA AND FROM THE 
ASMVT WORKAREA FOR ILRPAGCM. 
IF THERE ARE ANY, PLACE THEM 
ON THE PART AIA ERROR QUEUE 
AND SCHEDULE THE SRB FOR PART 
MONITOR, IF NOT ALREADY 
SCHEDULED, TO PROCESS THESE 
AIA'S. 

B. IF THERE ARE ANY COMPLETED 
AIA'S TO BE RETURNED TO RSM, 
ATTEMPT TO RETRY TO RETURN 
THEM TO RSM. ALSO SET THE 
ILRPAGCM RECURSION FLAG. IF 
RETRY IS NOT ALLOWED, OR IF 
THE ILRPAGCM RECURSION FLAG 
IS SET, ATTEMPT TO RETURN THE 
AIA'S TO RSM FROM FRR. THIS 
IS NOT ALWAYS DONE BECAUSE 
SUCH A CALL MIGHT CAUSE A 
RECURSIVE PROBLEM. 

RETRY IS ATTEMPTED UNLESS 
PROHIBITED BY RTM OR UNLESS 



INFORMATION NECESSARY FOR RETRY 
IS NOT AVAILABLE. 



Diagram 25.20 ILRIOFRR (Part 2 of 2) 
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Output 



-, ^ ASMVT 








ASMSTAGQ 







J-u 






]1h> 



WORK AREA 



] u 



DATA AREA 



ILRCQIOE: 

| 01 | VERIFY AND CORRECT 
ASMSTAGQ . 

1 02 j IF ATAAIA POINTS TO A 

VALID AIA AND IT IS NOT ON 
THE ASMSTAGQ, MARK IT IN 
ERROR AND QUEUE IT TO THE 
AIA ERROR QUEUE IN THE 
' PART. 



1^> 



| 03 I VERIFY TEMPORARY WRITE 

QUEUES IN ASMVT WORKAREA. 



LbO 



m 



| REG 3 



ASMVT 








ASMSTAGQ 







ATA 


AIA 


| ATAAIA 

ASMVT 


1^ 




AIAERROR 




PART 


| ASMPART 


~\S~*' 




PARTAIAE 










1 01 I VERIFY AND RECONSTRUCT THE 
ASMSTAGQ . 

| 02 | VERIFY THAT ATAAIA POINTS TO A 

VALID AIA. IF IT DOES, A FURTHER 
CHECK IS MADE TO SEE IF THIS AIA 
IS STILL ON THE ASMSTAGQ WAITING 
TO BE PROCESSED (IF IT WAS, ITS 
ADDRESS WOULD BE IN ASMSTAGF) . 
IF IT IS NOT ON THE ASMSTAGQ 
(ALREADY BEING PROCESSED) , THE 
ERROR FLAG IN THE AIA IS TURNED 
ON AND THE AIA IS QUEUED TO THE 
ERROR AIA QUEUE IN THE PART, 
PARTAIAE . 

| 03 | VERIFY AND CORRECT THE TEMPORARY 
WRITE QUEUES IN THE ASMVT 
WORKAREA. 



ILRVASGQ 



ILRVIOEQ 



Diagram 25.20.1 ILRCQIOE (Part 1 of 2) 
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Output 




(04| REMOVE WRITE REQUESTS FROM- 
TEMPORARY WRITE QUEUES AND* 
QUEUE THEM TO THE PART 
WRITE QUEUES. 

A. COMMON AREA WRITE QUEUE 

B. SECONDARY WRITE QUEUE 

C. PRIVATE AREA WRITE 
QUEUE 

I 05 I SCHEDULE PART MONITOR. 



| 06 | SET UP FOR RETRY IF 
RECURSION IS NOT 
INDICATED. 



1U 






TO CALLER 



ASMVT PART 


|asmpart |J 


_ 


PARTCOMQ 


PARTDUPQ 


PARTLOCQ 









SDWA 








SDWARTYA 







| 04 | IF THERE ARE ANY REQUESTS ON THE 
TEMPORARY WRITE QUEUES, THE ASM 
LOCK THAT SERIALIZES THE PART 
QUEUES MUST BE OBTAINED IF IT IS 
NOT ALREADY HELD. THE WRITE 
REQUESTS ARE THEN QUEUED TO THE 
APPROPRIATE PART WRITE QUEUE. 
THE ASM CLASS LOCK IS FREED - IT 
IS FREED EVEN IF IT HAD ALREADY 
BEEN HELD SINCE RTM DOES NOT 
FREE LOCKS ON RETRY. 
SERIALIZATION IS MAINTAINED 
SINCE THE SALLOC LOCK IS STILL 
HELD. 

| 05 | PART MONITOR IS SCHEDULED, IF IT 
ISN'T ALREADY SCHEDULED, TO 
HANDLE ANY REQUESTS THAT MIGHT 
HAVE BEEN QUEUED. 

| 06 | IF THE ILRQIOE RECURSION 

INDICATOR IS NOT SET, THE RETRY 
ADDRESS IN THE SDWA, SDWARTYA, 
IS SET TO THE ADDRESS IN ILRQIOE 
AT WHICH 'RETURN TO THE CALLER* 
IS PERFORMED. THE ILRQIOE 
RECURSION INDICATOR IS ALSO SET. 



Diagram 25.20.1 ILRCQIOE (Part 2 of 2) 
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Processing 



Output 



|reg 


i 


l<" 


SDWA 


" 








|reg 


3 


h 


ASMVT 
















|reg 


4 


-Jl 


ATA 










ATAAIA 




ATAASCB 












|reg 


8 


h 


WORK AREA 








* 








|reg 


9 


h 


DATA AREA 








^ 





Cb 



1 01 I VERIFY AND CORRECT RELATED 
QUEUES : 

A. SARWAITQ. 

B. QUEUE OF REMAINING 
AIA'S TO PROCESS. 

| 02 | VALIDITY CHECK THE AIA. 

| 03 | PROCESS VALID AIA FOR A 
SWAP IN REQUEST. 



==> 



ASMVT 


SART 


| ASMSART 


I 1 " 




SARWAITQ 









ASMVT 








ASM3TMPA 







AIA 


' 






AIAERROR 







|REG 3 |-| ^ ASMVT 








ASMIORQC 








ASM3PIOP 







Notes 



j 01 | VERIFY AND CORRECT THE QUEUES 

THAT MIGHT HAVE BEEN AFFECTED BY 
AN ERROR DURING SWAPCOMP 
PROCESSING: 

A. THE SARWAITQ. 

B. THE QUEUE OF REMAINING AIA'S 

(POINTED TO BY ASM3TMPA) . 

| 02 | VALIDITY CHECK THE AIA POINTED 
TO BY ATAAIA. 

| 03 | IF ATAAIA POINTS TO A VALID AIA 
FOR A SWAP IN REQUEST 
(ATAASCB«=0) , THE INDETERMINATE 
ERROR FLAG, AIAERROR, IS TURNED 
ON, THE AIA IS PLACED ON THE 
INTERNAL QUEUE OF AIA'S TO BE 
RETURNED TO RSM (IF NOT ALREADY 
THERE) , AND THE COUNT OF 
COMPLETED REQUESTS IN THE ASMVT, 
ASMIORQC, IS INCREMENTED. SET UP 
FOR ADDRESS SPACE TERMINATION BY 
PUTTING THE ASCB ADDRESS IN 
ATAASCB AND TURNING ON THE SWAP 
IN FLAG. 



ILRFRR01 
ILRFRR01 



ILRVSWTQ 



ILRVSPAQ 



Diagram 25.20.2 RECSCOMP (Part 1 of 2) 
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Input 



Processing 



| ATAASCB | r-*- 



Output 



[ 04 | IF ATAASCB IS NOT ZERO, 

VERIFY THAT ATAASCB POINTS 
TO A VALID ASCB. 



CO 



IEAVEGAS 



ASCB VERIFIER 



\°n 



IF ATAASCB POINTS TO A 
VALID ASCB, PROCESS ATAAIA 
(IF VALID), TURN ON THE 
PERMANENT ERROR FLAG IN 
THE ASM HEADER, AND 
TERMINATE THE MEMORY. 



[06 | UPDATE ATAAIA TO POINT TO 
THE NEXT AIA TO PROCESS. 



L 









| ATAAIA 


"1 , ► 


1^* 




AIAERROR 








| ASCBRSM 


_ |-| RSMHD-ASMHD 








ASHPERME 








| ATAASCB 


~ll > ASCB 








ASCBTERM 









| REG 4 [ ,-»• 



Notes 



| 04 | IF ATAASCB IS NOT ZERO, VERIFY 
THAT ATAASCB POINTS A VALID 
ASCB. 



IF ATAASCB POINTS TO A VALID 
ASCB: 

A. IF IT IS A SWAP OUT REQUEST, 
VALIDITY CHECK THE ASHCAPQ. 
THEN IF ATAAIA POINTS TO A 
VALID AIA, TURN ON THE 
INDETERMINATE ERROR FLAG, 
AIAERROR, AND PLACE THE AIA 
ON THE ASHCAPQ. (ASHCAPQ IS A 
QUEUE OF COMPLETED SWAP-OUT 
REQUESTS FOR AN ADDRESS 
SPACE. WHEN ALL THE REQUESTS 
COMPLETE, THEY ARE RETURNED 
TO RSM.) TURN ON THE 
PERMANENT ERROR FLAG, 
ASHPERME, TO PREVENT SWAPCOMP 
FROM EVER CALLING IEAVSWPC 
NORMALLY . 

B. IF A SWAP-IN REQUEST, SET THE 
RSMFAIL FLAG. 

C. BECAUSE AN INDETERMINATE 
ERROR HAS OCCURRED, TERMINATE 



Routine Label 



ILRVSPAQ 



25.27. 
6 



THE ADDRESS SPACE. 

UPDATE ATAAIA TO POINT TO THE 
NEXT AIA (IN ASM3TMPA) . THE 
REMAINING AIA'S WILL BE 
CLEANED-UP BY THE PROCESSING IN 
THE MAINLINE OF ILRIOFRR. 



Routine Label 



Diagram 25.20.2 RECSCOMP (Part 2 of 2) 
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Input 



Processing 



Output 



REG 1 | i-Vj 



REG 4 |i ATA 



FROM RECPCOMP 
OR ILRIOFRR 
MAINLINE 



REG 8 |i 



WORKAREA 



\ 



DATA AREA 



PCBASCB [ r-*- 



M 



I 1 I RESTORE ADDRESSABILITY TO 
THE CURRENT ADDRESS SPACE. 



| 02 | VALIDITY CHECK THE QUEUE 
OF AIA'S. 



I 03 1 IF ATAAIA POINTS TO A 

VALID AIA, OBTAIN THE ASM 
LOCK FOR ITS ADDRESS 
SPACE, IF IT IS NOT 
ALREADY HELD. 



1=0 



iU 



| REG 4 | 



ATA 








ATAAIA 







I 1 

I ASCBRSM | |-> 



RSMHD-ASMHD 



[01 | ISSUE A TRAS BACK TO RESTORE THE 
STOR (SEGMENT TABLE ORIGIN 
REGISTER) OF THE CURRENT MEMORY. 
THIS IS NECESSARY IF THE ERROR 
OCCURRED DURING A TRAS OPERATION 
FOR ALL ERRORS EXCEPT A DAT 
ERROR (RESTORE HAS BEEN DONE BY 
RTM) . 

| 02 | VALIDITY CHECK THE QUEUE OF 

AIA'S BEING PROCESSED, STARTING 
WITH ATAAIA. 

1 03 1 IF ATAAIA POINTS TO A VALID AIA 
(NON-ZERO ADDRESS), USE THE LOCK 
WORD IN THE ASM HEADER, ASHLOCK, 
TO OBTAIN THE ASM CLASS LOCK FOR 
THE RELATED ADDRESS SPACE. 



ILRVAIAQ 



Diagram 25.20.3 RECVIOCM (Part 1 of 2) 
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ATA AIA 




|ataaia | j 






AIACEPTR 








AIALGE 















J 



1 04 1 IF ATAAIA POINTS TO A 

VALID AIA, VERIFY THE LGE 
AND ITS PROCESS QUEUE. IF 
AIALGE POINTS TO A VALID 
LGE, DEQUEUE THE AIA OR 
ITS RELATED ACE FROM THE 
LGEPROCQ. 



05 



SCHEDULE SRB CONTROLLER IF 
NOT ALREADY SCHEDULED. 



| 06 | FREE ASM CLASS LOCK IF IT 
WAS ALREADY HELD OR JUST 
OBTAINED. 



TO RECPCOMP OF 

ILRIOFRR 

MAINLINE 




Notes 



[oT| IF. ATAAIA POINTS TO A VALID AIA, 
THEN AIALGE AND ITS LGEPROCQ ARE 
VALIDITY CHECKED. IF AIALGE 
POINTS TO A VALID LGE, THE AIA, 
OR ITS RELATED ACE (IF AIATRPSP 
IS ON) , IS DEQUEUED FROM THE 
LGEPROCQ. IF ANY VERIFICATION 
FAILS, OR IF THE AIA OR ACE WAS 
NOT FOUND ON THE LGEPROCQ, THE 
AIA MUST NOT BE RETURNED TO RSM 
SINCE THE AIA, OR A RELATED ACE, 
MIGHT STILL BE ON SOME LGEPROCQ 
WAITING TO BE PROCESSED. SO AN 
INTERNAL FLAG IS SET TO PREVENT 
FURTHER PROCESSING OF THIS AIA. 

|05[ SCHEDULE THE SRB CONTROLLER IF 
IT IS NOT ALREADY SCHEDULED. 
THIS IS ONLY DONE IF THE ASM 
LOCK IS HELD. 

1 06 1 A TEST IS MADE TO SEE IF THE ASM 
LOCK IS HELD. THIS TEST IS MADE 
WHETHER OR NOT ATAAIA POINTS TO 
A VALID AIA. IF THE ASM LOCK IS 
HELD, IT IS UNCONDITIONALLY 
FREED BEFORE CONTROL IS GIVEN TO 
THE RECPCOMP ROUTINE TO COMPLETE 
RECOVERY PROCESSING. 



ILRVLPRQ 



Diagram 25.20.3 RECVIOCM (Part 2 of 2) 
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FROM ILRIOFRR 
MAINLINE 

lb 






5DWA 




|reg 1 


*' 




\i * 1 
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VSMVT 




| REG 3 


Jw 
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VTA 




| REG 4 


Ju' 












ATAAIA 








ATAASCB 










<0RK AREA 




> 




| REG 8 


Ju' 








1 




)ATA AREA 




| REG 9 


^U 






1 
















SDWA I 




| REG 1 


i t - 




i ■ 


SDWACMPC 7 

























1 01 I RESTORE THE SEGMENT TABLE 
ORIGIN REGISTER OF THE 
CURRENT MEMORY (TRAS) . 



| 02 I VERIFY AND CORRECT THE 
QUEUE OF AIA'S STARTING 
WITH ATAAIA. 



| 03 | IF THE ERROR IS A TRAS 

ERROR, VALIDITY CHECK THE 
ERROR ASCB. IF IT POINTS 
TO A VALID ADDRESS SPACE, 
TERMINATE THIS ADDRESS 
SPACE. 



<T> 



ASCB VERIFIER 



1 04 J IF THE ERROR IS NOT A TRAS- 
ERROR, SET THE RETRY 
ADDRESS IN THE SDWA FOR 
RETRY TO CALL ILRSLSQA. 



1^> 



i=$ 



i=> 



1-*- 






ATAAIA 







ASCB 








ASCBTERM 







J^ 



ISSUE A TRAS BACK TO RESTORE THE 
SEGMENT TABLE ORIGIN REGISTER 
(STOR) OF THE CURRENT MEMORY. 
THIS IS NECESSARY IF THE ERROR 
OCCURRED DURING A TRAS OPERATION 
FOR ALL ERRORS EXCEPT A DYNAMIC 
ADDRESS TRANSLATION (DAT) ERROR 
(RESTORE HAS BEEN DONE BY RTM) . 

VERIFY AND CORRECT THE QUEUE OF 
AIA'S BEING PROCESSED (POINTED 
TO BY ATAAIA) . 

IF ERROR IS A TRAS ERROR (A DAT 
ERROR DURING A TRAS OPERATION 
INDICATED BY A UNIQUE COMPLETION 
CODE IN THE SDWA) , USE MEMTERM 
TO TERMINATE THE ERROR ADDRESS 
SPACE (THE ASCB ADDRESS WAS 
TRACKED IN ATAASCB) , IF THE 
ADDRESS SPACE IS VALID. 



[04] FOR NON-TRAS ERRORS, THE MEMORY 
IS STILL IN PROCESS, SO THE SDWA 
IS SET FOR RETRY TO THE POINT IN 
PAGECOMP WHERE THE CALL TO 
ILRSLSQA IS" MADE. 



E3 



Label 



ILRVAIAQ 
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IF THE ERROR OCCURRED IN - 
ILRVIOCM,RECVIOCM GETS 
CONTROL PRIOR TO RECPCOMP. 
IF ATAAIA POINTS TO A 
VALID AIA, AND IF THE 
RECVIOCM NORETRY FLAG IS 
NOT SET, THEN MARK THE AIA 
IN ERROR AND COMPLETE THE 
PROCESSING FOR THIS AIA. 
OTHERWISE, ZERO THE RETRY 
ADDRESS IN THE SDWA TO • 
PREVENT RETRY. 

IF RETRY HAS BEEN 
REQUESTED, COMPLETE THE 
SET-UP FOR RETRY. 



ATAAIA !-*■ 



JREG 1 |t SDWA 








SDWARTYA 







| REG 3 |-| ASMVT 








ASMIORQC 








ASM3PIOP 







IF ATAAIA POINTS TO A VALID AIA 
(NON-ZERO ADDRESS) , AND. RECVIOCM 
PROCESSING HAS NOT INDICATED 
THAT THIS AIA IS NOT TO BE 
PROCESSED, THE INDETERMINATE 
ERROR FLAG, AIAERROR, IS TURNED 
ON AND THE AIA IS PLACED ON THE 
INTERNAL QUEUE OF AIA'S FOR RSM. 
THE VALUE OF ATAAIA AND THE 
ASMIORQC COUNT ARE ALSO UPDATED. 
OTHERWISE, THE RETRY ADDRESS IN 
THE SDWA IS ZEROED TO PREVENT 
RETRY . 

IF THE RETRY ADDRESS IN THE SDWA 
IS NOT ZERO, COMPLETE THE RETRY 
SET-UP TOR RETRY TO CALL 
ILRSLSQA. 
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FROM ILRIOFRR 
MAINLINE 






3DWA 
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|reg 1 


i,v 
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^SMVT 




| REG 3 


Ju' 












ASMSTAGQ 










VTA 




| REG 4 


Jw 


















ATAAIA 




ATALGE 
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| REG 8 
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| REG 9 
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\SCB | 




| PSAAOLD 


"1 rV 




1 ' 
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ASCBRSM 





















RECPOS : 

1 01 | IF ATAAIA POINTS TO A 

VALID AIA/ACE, MARK IT IN 
ERROR, OTHERWISE ZERO AIA 
FIELD IN ATA. 

| 02 | IF NOT A TRANSFER PAGE 

REQUEST, REMOVE ATAAIA 

FROM THE ASMSTAGQ IF IT IS 
QUEUED. 

| 03 | VERIFY AND CORRECT 

LGEPROCQ, REMOVING ATAAIA 
IF QUEUED. 



[04 | FREE THE ASM CLASS LOCK IF- 
IT IS HELD. 



| 05 | SET UP FOR RETRY, IF 

RECURSION NOT INDICATED. 




1^ 



| ATAAIA | r-* 





, 




JREG 3 




I 1- *" 




ASMSTAGQ 


ASMIORQR 









| ATALGE | !-► 



LGEPROCQ 



| ASCBRSM | !-»■ 



RSMHD-ASMHD 



| REG -1 



SDWA 








SDWARTYA 







1 01 I IF ILRPOS WAS CALLED FOR A 

TRANSFER PAGE REQUEST, VERIFY 
THAT ATAAIA POINTS TO A VALID 
ACE. OTHERWISE VERIFY THAT 
ATAAIA POINTS TO A VALID AIA, 
AND THEN TURN ON THE 
INDETERMINATE ERROR FLAG, 
AIAERROR. IF ATAAIA DOES NOT 
POINT TO A VALID AIA OR ACE, THE 
FIELD IN THE ATA IS ZEROED. 

| 02 | IF ILRPOS WAS NOT CALLED FOR A 

TRANSFER PAGE REQUEST (INDICATED 
BY THE ATA FLAGS) AND THE AIA 
POINTED TO BY ATAAIA IS QUEUED 
TO THE ASMSTAGQ, THE AIA IS 
DEQUEUED AND THE COUNT OF 
RECEIVED REQUESTS IN THE ASMVT, 
ASMIORQR, IS DECREMENTED. 

| 03 | VERIFY THE LGEPROCQ. IF ATALGE 
IS A VALID LGE DEQUEUE ATAAIA 
FROM THE LGEPROCQ IF IT IS 
QUEUED. 

1 04 1 THE ASM LOCK FOR THE CURRENT 
ADDRESS SPACE IS FREED, IF IT 
HAD BEEN HELD BY ILRPOS. 



ILRFRR01 
ILRFRR01 



ILRVACE 
ILRVAIA 



ILRVLPRQ 



IF THE ILRPOS RECURSION 
INDICATOR IS NOT SET, THE RETRY 
ADDRESS IN THE SDWA, SDWARTYA, 
IS SET TO THE ADDRESS IN ILRPOS 
AT WHICH 'RETURN TO THE CALLER" 
IS PERFORMED. THE ILRPOS 
RECURSION INDICATOR IS ALSO SET. 
IF THE RECURSION INDICATOR IS 
ALREADY SET, NO RETRY IS 
ATTEMPTED. 
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Processing 



| REG 1 



ASMSTAGQ 



Output 



u 



I REG 8 



WORK AREA 



| REG 9 



>L» 



DATA AREA 



RECPAGIO: 

[oT| IF ATAAIA POINTS TO A 
VALID AIA, MARK IT IN 
ERROR AND PLACE IT IN THE 
SAVE AREA FOR RETURN TO 
RSM. 

[oT| IF ATAAIA POINTS TO A 

VALID AIA, REMOVE ATAAIA 
FROM ASMSTAGQ IF IT IS 
QUEUED. 

j 03 1 SET UP FOR RETRY, IF RETRY- 
IS ALLOWED AND RECURSION 
IS NOT INDICATED. 



T±> 



%> 



ATA AIA 


| ATAAIA |J 




AIAERROR 















|reg 3 




i r * 




ASMSTAGQ 


ASMIORQR 









SDWA 








SDWARTYA 







VERIFY THAT ATAAIA POINTS TO A 
VALID AIA. IF IT DOES, THE ERROR 
FLAG IN THE AIA IS TURNED ON, 
AND THE VALUE OF ATAAIA IS 
PLACED IN THE SAVE AREA SO IT 
WILL BE RETURNED TO RSM. IF 
ATAAIA DOES NOT POINT TO A VALID 
AIA, THE VALUE IN THE SAVE AREA 
REMAINS ZERO TO PREVENT ASM FROM 
RETURNING AN INVALID ADDRESS TO 
RSM. 

IF THE AIA POINTED TO BY ATAAIA 
IS QUEUED TO THE ASMSTAGQ, IT IS 
DEQUEUED AND THE COUNT OF 
RECEIVED REQUESTS IN THE ASMVT, 
ASMIORQR, IS DECREMENTED. 

IF THE ILRPAGIO RECURSION 
INDICATOR IS NOT SET, THE RETRY 
ADDRESS IN THE SDWA, SDWARTYA, 
IS SET TO THE ADDRESS IN 
ILRPAGIO AT WHICH THE CALL TO 
ILRQIOE IS MADE. THE ILRPAGIO 
RECURSION INDICATOR IS ALSO SET. 
IF THE RECURSION INDICATOR IS 
ALREADY SET, NO RETRY IS 
ATTEMPTED. 
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Diagram 25.20.6 RECPAGIO (Part 1 of 1) 
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REG 
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w h 












REG 


3 


ll 


ASMVT 








* 


I 






REG 


4 


h 


ATA 














ATAACE 












REG 


8 


h 


WORK AREA 








" 


I 






REG 


9 


h 


DATA AREA 








" 


I 



FROM ILRIOFRR 



t> 



|01 | VERIFY THAT ATAACE POINTS 
TO ADDRESSABLE STORAGE. 

| 02 | IF ATAACE IS A VALID 
CONTROL BLOCK, VERIFY 
ACEAIAPT. IF AIA IS A 
VALID AIA, THE AIA IS 
DISCONNECTED FROM THE ACE. 

[ 03 | IF THE ACE IS A VALID 

CONTROL BLOCK, RETURN THE 
CELL TO ITS POOL. 



lU 



1U 



ACE AIA 


| ACEAIAPT |J 




AIAVIO 


AIATRPSP 


AIACEPTR 















|REG 3 




I 1 "*" 




ASMACEPC 









|01 | IF ATAACE IS NON-ZERO, VERIFY 
THAT THE ENTIRE STORAGE OF THE 
ACE CAN BE REFERENCED. 

| 02 | IF ATAACE IS VALID, THE AIA 
POINTED TO BY ACEAIAPT IS 
VALIDITY CHECKED. IF IT IS 
VALID, IT IS DISCONNECTED FROM 
THE ACE. 

| 03 | IF ATAACE IS VALID, THE CELL 

USED FOR THE ACE IS RETURNED TO 
ITS POOL. 
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Processing 



Output 



FROM ILRIOFRR 



t> 



ILRSWP01: 

f 01 | ILRSWP01 IS THE RECOVERY 
ROUTINE FOR ILRSWPDR. 

1 02 J CHECK FOR A SWAP ACTIVITY 
REFERENCE TABLE ENTRY 
(SARTE) ADDRESS 
CHECKPOINTED IN THE ATA. 
IF ZERO, SKIP TO STEP 8. 

| 03 | CALL RBDIORB IF A SWAP 
DRIVER ISSUED '084000' 
ABEND. SKIP TO STEP 7. 

| 04 | VALIDITY CHECK THE IORB 
POINTED TO BY THE ATA. 
SKIP TO STEP 5 IF INVALID. 

| 05 | PROCESS A VALID 

CHECKPOINTED IORB. SKIP TO 
STEP 7. 

| 06 | VALIDITY CHECK THE IORB 

ANCHORED IN THE SARTE. FOR 
AN INVALID IORB, CALL 
RBDIORB AND SKIP TO STEP 

7. 



| 01 | ILRSWP01 AND ITS TWO ENTRIES 
HANDLE ERRORS OCCURRING IN 
ILRSWPDR AND ILRSWAP. 

| 02 | IF A SARTE IS NOT CHECKPOINTED 
(ATASARTE) , THE SWAP DRIVER 
(ILRSWPDR) IS IN ENTRY OR EXIT 
PROCESSING. RECOVERY CONSISTS OF 
RESCHEDULING SWAP DRIVER'S SRB. 

| 03 | AN '084' ABEND WAS ISSUED WHEN 
SWAP DRIVER FOUND A ZERO IORB 
ANCHOR IN A SARTE. THE ABEND 
CODE IS FOUND IN THE SDWA FIELD 
SDWACMPC. THE RBIORB SUBROUTINE 
IS CALLED TO ATTEMPT REBUILDING 
AN IORB. 

| 04 | THE CURRENT IORB IS VALIDITY 

CHECKED. NOTE THAT IF AN IORB IS 
NOT CHECKPOINTED, THIS RECOVERY 
WILL STILL VALIDITY CHECK THE 
IORB QUEUE ANCHORED IN THE 
SARTE . 

| 05 | THE QUEUE OF SCCWS ANCHORED IN 
THE IORB (IORSCCW) IS VALIDITY 
CHECKED AND MERGED WITH THE 



ILRVSCWQ 



QUEUE OF SCCWS ANCHORED IN THE 
ATA (ATASCCW) . BECAUSE SWAP 
DRIVER MOVES SCCWS INDIVIDUALLY 
FROM THE ATA TO IORB SCCW QUEUE, 
A CHECK IS MADE TO INSURE THAT 
THE ATA SCCW QUEUE DOES NOT 
CONTAIN DUPLICATE SCCWS. THE 
IORB IS FREED BY TURNING OFF THE 
IORB IN USE FLAG (IORUSE) AND 
THE IORB SCCW QUEUE ANCHOR IS 
ZEROED. 

THE IORB ANCHOR IN THE SARTE IS 
VALIDITY CHECKED TO INSURE AT 
LEAST ONE VALID IORB EXISTS FOR 
THIS SARTE. IF THE ANCHOR IORB 
IS INVALID THE RBDIORB 
SUBROUTINE IS CALLED TO REBUILD 
AN IORB. 



Routine Label 



ILRVIORB 
RBDIORB 



Diagram 25.21 ILRSWPOl (Part 1 of 2) 
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Input 



Processing 



Output 



j 07 { VALIDITY CHECK THE 

REMAINING IORB QUEUE 
ANCHORED IN THE SARTE. 

| 08 | FOR A SARTE ADDRESS 

CHECKPOINTED IN THE ATA: 

A. UNLOCK THE SARTE, AND 

B. PROCESS A SCCW QUEUE 
ANCHORED IN THE ATA. 

| 09 | SCHEDULE SWAP DRIVER'S 
SRB, IF NECESSARY. 

[To] RETURN TO CALLER. 



F° 



TO ILRIOFRR 



ATA SCCW 






f 





SCCW 








r'l 1 




SCCW 




;arte 


- 


'1 1 








SRESCCW 









1 07 1 EACH IORB ON THE SARTE IORB 

QUEUE IS VALIDITY CHECKED. THE 
QUEUE IS TRUNCATED IF AN INVALID 
IORB IS FOUND. 

| 08 | IF THE REBUILD IORB SUBROUTINE 
WAS CALLED AND WAS UNABLE TO 
REBUILD AN IORB, THE SARTE 
ADDRESS WILL HAVE BEEN ZEROED TO 
PREVENT UNLOCKING THE SARTE. 

A. SWAP DRIVER'S REDRIVE FLAG 
(SREDRIVE) IS TURNED OFF AND 
THE SARTE IS UNLOCKED 
(SRELOCK) USING COMPARE AND 
SWAP . 

B. THE ATA SCCW QUEUE IS 
VALIDITY CHECKED. THE COMMAND 
CHAINING FLAGS IN THE LAST 
READ/WRITE CCW OF EACH SCCW 
ARE CLEARED TO BREAK THE SCCW 
CHAINING BETWEEN SCCWS . THE 
ATA SCCW QUEUE IS ADDED TO 
THE SARTE SCCW WORK QUEUE 
(SRESCCW) USING COMPARE AND 
SWAP. 

I 09 I IF A SWAP DRIVER SRB IS NOT 



Routine Label 



ILRVSCWQ 



CURRENTLY ACTIVE (SARSRBCT=0) , 
THE SRB COUNT IS INCREMENTED 
USING COMPARE AND SWAP. THE SWAP 
DRIVER SRB IS RESCHEDULED TO 
PROCESS WORK LEFT ON THE SARTE 
SCCW QUEUE BY THIS RECOVERY. 



Routine Label 
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Input 



Processing 



ASHSWAPQ 



Output 



FROM ILRIOFRR 



fia 



ILRCSWAP: 

| 01 | CALL ILRVSPAQ TO VALIDITY 
CHECK THE SWAP QUEUE 
ANCHORED IN THE ASM 
HEADER . 

| 02 [ SET UP THE RETRY ADDRESS 

AND REGISTERS IN THE SDWA. 

| 03 I RETURN TO CALLER. 



TO ILRIOFRR 



|01| THE EFFECT OF THIS RECOVERY IS 

TO PASS SWAP AIAS BACK TO RSM SO 
THAT FRAMES ASSOCIATED WITH THE 
AIAS MAY BE FREED PRIOR TO 
MEMORY TERMINATION. A NON ZERO 
SWAP QUEUE ANCHORED IN THE ASM 
HEADER IS VALIDITY CHECKED TO 
PREVENT A REOCCURRENCE OF THIS 
ERROR BY RSM. THE FIRST AIA 
RETURNED TO RSM IS FLAGGED IN 
ERROR (AIAERROR) . 

| 02 | IF THE ERROR IS NOT RECURSIVE, A 
RECURSION FLAG IS SET IN THE 
ATA. THE RETRY ADDRESS AND THE 
REGISTER SAVE AREA ARE 
INITIALIZED IN THE SDWA. A 
NON-ZERO RETRY ADDRESS INDICATES 
TO ILRIOFRR THAT RETRY OF THE 
ERROR IS REQUESTED. ILRIOFRR 
WILL COMPLETE INITIALIZATION OF 
THE SDWA. 



ILRVSPAQ 



Routine 



Diagram 25.21.1 ILRCSWAP (Part 1 of 1) 
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Output 



L 



|REGISTER~T] 



FROM ILRIOFRR 



fc> 



ASMSTAGQ 



ASM4RG2 



ASHSWAPQ 



I 



ILRCSLSQ: 



IF EITHER OF THE ILRSLSQA 
SUBROUTINES WAS IN CONTROL 
AT THE TIME OF ERROR, CALL 
THE APPLICABLE RECOVERY 
SUBROUTINE AND SKIP TO 
STEP 5. 

IF THE SWAP REQUEST IS 
CURRENTLY ON THE ASMHD 
SWAP QUEUE AND THE ASMVT 
STAGING QUEUE, CLEAR THE 
SWAP QUEUE ANCHOR IN THE 
ASM HEADER AMD SKIP TO 
STEP 5. 

TERMINATE THE MEMORY FOR A 
SWAP REQUEST ANCHORED IN 
THE ASM HEADER SWAP QUEUE. 
SKIP TO STEP 5. 



E] 



THE RECOVERY SUBROUTINES ARE: 
ASETRCVY FOR ASIGNSET — 
SCCWRCVY FOR SCCWPROC. FLAGS IN 
THE ATA INDICATE THE ROUTINE IN 
CONTROL AT THE TIME OF ERROR. 
ERRORS IN ASIGNSET, WITH THE 
EXCEPTION OF ASM ISSUED ABENDS, 
ARE TREATED AS MAINLINE ILRSLSQA 
ERRORS. 



fo7| A SWAP REQUEST CAN COMPLETE 

SUCCESSFULLY IF IT IS ALREADY ON 
THE ASMVT STAGING QUEUE 
(ASMSTAGQ) . THIS SITUATION 
OCCURS WHEN ILRSLSQA IS MOVING A 
SWAP REQUEST FROM THE ASMHD SWAP 
QUEUE TO THE ASMVT STAGING 
QUEUE. 

[pi] THE SWAP REQUEST IS NOT 
CURRENTLY READY FOR I/O 
PROCESSING. THE MEMORY IS 
SCHEDULED FOR TERMINATION WITH A 
SYSTEM X'028' COMPLETION CODE. 
FOR A SWAP-IN REQUEST, A FLAG IN 
THE RSM HEADER (RSMFAIL) IS SET 
TO INDICATE A SWAP-IN FAILURE. 



Routine Label 



ASETRCVY 
SCCWRCVY 



Ref 
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Input 



Processing 



ASMSART 



ASMSTAGQ 



ASM4RG2 



SARWAITF 



SARWAITL 



Output 



1 04 1 FOR AN AIA CHECKPOINTED IN 
THE ATA: 

A. VALIDITY CHECK THE 
CHECKPOINTED ATA AIA 
QUEUE. 

B. VALIDITY CHECK THE SART 
WAIT QUEUE. 

C. ADD THE ATA AIA QUEUE 
TO THE SART WAIT QUEUE. 



| 05 | INITIALIZE THE SDWA FOR 
RETRY . 

| 06 | RETURN TO CALLER. 



TO ILRIOFRR 



Notes 


Routine 


Label 


Ref 


Notes 


Routine 


Label 


Ref 


|04| A CHECKPOINTED AIA REPRESENTS A 
SWAP REQUEST CURRENTLY READY FOR 
I/O PROCESSING. THE ATA AIA 
QUEUE CAN BE LEFT ON THE SART 
WAIT QUEUE FOR REPROCESSING BY 
ILRSLSQA. 








SDWASRSV) ARE USED FOR RETRY. IF 
THIS IS NOT A RECURSIVE ERROR 
( ATARCRF6= ' ' B ) , THE RECURS ION 
FLAG IS SET IN THE ATA, AND A 
RETRY ADDRESS IN ILRSLSQA IS SET 
IN THE SDWA. AT THE RETRY POINT, 
LABELLED ILRCRSP2, ILRSLSQA WILL 








A. THE CHECKPOINTED AIA QUEUE IS 
VERIFIED BEFORE ADDING IT TO 
THE SART WAIT QUEUE. 


ILRFRR01 


ILRVSPAQ 


25.27. 
6 


CHECK FOR WORK LEFT ON THE SART 
WAIT QUEUE BY RECOVERY. THE RSM 
HEADER REGISTER (REG3) , AND 
ILRSLSQA BASE REGISTER (REG 12) 








B. THE SART WAIT QUEUE IS 

VALIDITY CHECKED TO REMOVE 
INVALID ELEMENTS CAUSED BY 


ILRFRR01 


ILRVSWTQ 


25.27. 
3. 


ARE REINITIALIZED IN THE SDWA. 
THE ATA CHECKPOINTED FIELDS ARE 
CLEARED. 








THIS ERROR. 
















C. IF THE CHECKPOINTED AIA IS 
















VALID, IT IS COMPARED TO EACH 
















ELEMENT ON THE SART WAIT 
















QUEUE. THE AIA IS ADDED TO 
















THE SART WAIT QUEUE IF NOT 
















ALREADY ON THE QUEUE. 
















SERIALIZATION FOR THE WAIT 
















QUEUE IS PROVIDED BY THE 
















SALLOC LOCK, HELD BY THIS 
















RECOVERY ROUTINE ON ENTRY. 
















|05j FOR ASM ISSUED ABENDS THE ERROR 
















PSW AND REGISTERS (SDWANXT1 AND 
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J 


1 1 


SRESCCW 






SCCW2 

s — i 


SREAVLSL 









fc> 



RBDIORB: 

| 1 | ATTEMPT TO ACQUIRE STORAGE 
TO REBUILD AN IORB. SKIP 
TO STEP 3 IF UNSUCCESSFUL. 

| 02 | INITIALIZE THE CONSTANT 
FIELDS IN THE NEW 
IORB-IOSB-SRB I/O STRING. 
ANCHOR THE REBUILT IORB IN 
THE SART ENTRY. SKIP TO 
STEP 6. 

) 03 1 RETURN THE SART ENTRY SCCW- 
QUEUE TO THE SART 
AVAILABLE SCCW QUEUE. 

1 04 1 RECALCULATE THE SART TOTAL- 
SWAP SET COUNT. 

| 05 1 NOTIFY THE OPERATOR OF AN 
UNUSABLE SART ENTRY. 

I 06 I RETURN TO CALLER. 




SART 


SCCW1 






Vi i 


SARSCCWQ 


SCCW2 

s 1 




SARSETCT 











THE SALLOC LOCK IS OBTAINED 
UNCONDITIONALLY AND A BRANCH 
ENTRY TO GETMAIN FOR SQA STORAGE 
IS ISSUED FOR THE LENGTH OF AN 
IORB-IOSB-SRB I/O STRING. 

THE ACQUIRED STORAGE IS CLEARED. 
THOSE FIELDS CHECKED BY ILRVIORB 
ARE INITIALIZED (IORID, IORSWAP, 
IORPARTE, IOSDVRID, AND 
IOSMISID) . ILRVIORB IS CALLED TO 
INITIALIZE CRITICAL 
IORB-IOSB-SRB FIELDS. 

A SART ENTRY IS UNUSABLE SINCE 
THE IORB CANNOT BE REBUILT. THE 
SCCW WORK QUEUE (SRESCCW) IS 
VALIDITY CHECKED AND RETURNED TO 
THE SART AVAILABLE SCCW QUEUE. 
THE AIAS ANCHORED IN THESE SCCWS 
ARE LOST. 

THE COUNT OF AVAILABLE SWAP SETS 
ON THIS SARTE IS SET TO ZERO. 
THE SART TOTAL SWAP SET COUNT IS 
RECALCULATED AS THE SUM OF EACH 
USABLE SARTE AVAILABLE SWAP SET 
COUNT. 



SETLOCK 
IEAVGMOO 



ILRVSCWQ 



\°n 



THE SART ENTRY IS FLAGGED 
UNUSABLE (SRENUSE) . ASM'S 
MESSAGE MODULE IS CALLED TO 
ISSUE AN UNUSABLE SWAP DATA SET 
MESSAGE, ILR009I. THE SART ENTRY 
ADDRESS IN THE ATA IS ZEROED TO 
PREVENT ILRSWP01 FROM UNLOCKING 
THIS SARTE. 
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FROM ILRCSLSQ 

(ILRSWP01 

ENTRY) 


ATA AIA1 | 










1 l| 


1 


*v 


J 




ATAAIA 








SCCW1 






ATASCCW 


'I 1 


















> 






SART AIA2 








rl 1 




SARWAITF 


AIA3 


\ 




SARWAITL 






'I 1 




SARSCCWQ 


V 


SCCW2 












r'l 1 






SCCW3 






'I 1 















Output 



SCCWRCVY: 

| 01 | PROCESS THE ASM- ISSUED 
'083000* ABEND. SKIP TO 
STEP 6. 

| 02 1 VALIDITY CHECK AN AIA 

CHECKPOINTED IN THE ATA. 
SKIP TO STEP 6 IF AN AIA 
IS NOT CHECKPOINTED. 

| 03 | ADD THE CHECKPOINTED AIA 
TO THE SART WAIT QUEUE. 

| 04 | VALIDITY CHECK A SCCW 

CHECKPOINTED IN THE ATA. 

| 05 | ADD A VALID SCCW TO THE 
SART SCCW QUEUE. 

| 06 | RETURN TO CALLER. 




TO ILRCSLSQ 





SART AIA1 








if' ' 


SARWAITF 


I AIA2 


SARWAITL 




r'l I 


SARSCCWQ 


I AIA3 




< 




'I I 


3CCW1 




r 


I 




| SCCW2 • 




r 


I 




| SCCW3 






I 













1 01 | WHEN THE LOGICAL SLOT ID IN AN 
AIA IS OUTSIDE THE RANGE OF 
VALID LSIDS, SCCWPROC 
(SUBROUTINE OF ILRSLSQA) ISSUES 
A RECORD ONLY ABEND. SCCWRCVY 
PROCESSING CONSISTS OF COPYING 
THE ERROR AIA (ATAAIA) INTO THE 
SDWA. 

| 02 | IF AN AIA IS NOT CHECKPOINTED, 
SCCWPROC HAS COMPLETED 
PROCESSING FOR BOTH THE AIA AND 
SCCW. 

[oT| AN AIA WHICH CONTAINS AN I/O 
ERROR FLAG (AIAPRIER OR 
AIABADID) IS IGNORED SINCE IT 
MAY ALREADY HAVE BEEN ADDED TO 
THE PART ERROR QUEUE (PARTAIAE) 
BY SCCWPROC. IF THE AIA IS 
VALID, IT IS ADDED TO THE SART 
WAIT QUEUE, SERIALIZED BY THE 
SALLOC LOCK. 

[04] THE CHECKPOINTED SCCW (ATASCCW) 
IS VALIDITY CHECKED. 

I 05 I A VALID SCCW IS ADDED TO THE 



25.27. 
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QUEUE OF AVAILABLE SCCWS 
ANCHORED IN THE SART (SARSCCWQ) 
VIA COMPARE AND SWAP. 



Diagram 25.21.4 SCCWRCVY (Part 1 of 1) 
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ATA 


SARTE 


1 






r* 






ATASARTE 


SREAVLSL 





















Output 



FROM ILRCSLSQ 

(ILRSWP01 

ENTRY) 



U 



| 01 | SET THE SART SET COUNT TO 
ZERO. 

| 02 1 FOR A SART ENTRY 

CHECKPOINTED IN THE ATA, 
ZERO THE SARTE AVAILABLE 
SET COUNT AND RECALCULATE 
THE SART TOTAL SET COUNT. 

foTl RETURN TO CALLER. 



IU 



TO ILRCSLSQ 



ATA 


SARTE 






-T*" 


SREAVLSL 


ATASARTE 


















1 01 I THIS ROUTINE IS ENTERED FOR 
EITHER OF 2 COD ABENDS: (1) 
INCORRECT SART TOTAL SWAP SET 
COUNT (SARSETCT) OR (2) 
INCORRECT SART ENTRY AVAILABLE 
SET COUNT (SREAVLSL) . IF THE 
SART ENTRY IS NOT CHECKPOINTED 
IN THE ATA (THE FIRST ABEND) , 
THE SART SET COUNT IS SET TO 
ZERO. 

| 02 | ASIGNSET (SUBROUTINE OF 

ILRSLSQA) CHECKPOINTS THE SART 
ENTRY IN THE ATA ONLY BEFORE 
ISSUING THE COD ABEND FOR AN 
INCORRECT SART ENTRY SET COUNT 
(THE SECOND ABEND). THIS SARTE* S 
SET COUNT IS ZEROED AND THE SART 
TOTAL SET COUNT IS RESET TO THE 
CURRENT TOTAL OF ALL AVAILABLE 
SWAP SET COUNTS IN EACH USABLE 
SART ENTRY. 
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Output 



FRR WORKAREA 



EPAIOEQP 



EPAWRTQ 



PAREPTR 



WRTIOEQ 



M 



ILRSRT01: 
I 01 I RECORD THE ERROR. 



02 COPY THE ATA AND EPATH. 



| 03 | VALIDITY CHECK THE CURRENT 
IOE. 

| 04 | REPLACE THE READ IOE'S. 






05 REPLACE THE WRITE IOE'S. 



PAREIOEQ 



PAREWTQE 



J 01 | MOVE THE MAINLINE 

MODULE- IN-ERROR (ILRPTM OR 
ILRSRT) NAME AND ILRSRT01 
(RECOVERY NAME) TO THE SDWA . 
ISSUE SETRP TO REQUEST RECORDING 
AND RELEASING OF THE S ALLOC AND 
THE CLASS LOCKS ON RETURN TO 
RTM. 

| 02 | THE ATA AND EPATH (IF 

CHECKPOINTED) ARE COPIED TO THE 
VARIABLE RECORDING AREA IN THE 
SDWA. IF THE EPATH ADDRESS IS 
ZERO GOTO STEP 22, SINCE NO 
RECOVERY CAN BE DONE WITHOUT THE 
INFORMATION IN THE EPATH. 

| 03 | THE CURRENT IOE (EPAIOEIP) IS 

ADDRESS VERIFIED. IF VALID IT IS 
PLACED ON THE APPROPRIATE IOE 
QUEUE, WRTIOEQ OR EPAIOEQP. 

| 04 | THE QUEUE OF READ IOE'S ON THE 
WORK QUEUE (EPAIOEQP) IS 
VALIDITY CHECKED. IF VALID 
IOE'S, THEY ARE REPLACED ON THE 
PARTE (PAREIOEQ) . EPAIOEQP 
SHOULD BE NON-ZERO ONLY IF 



ILRVIOEQ 



ILRPTM WAS PROCESSING. 

| 05 | THE QUEUE OF WRITE IOE'S IS 

VALIDITY CHECKED. IF ANY VALIDS 
THE CLASS LOCK IS OBTAINED AND 
THE IOE'S ARE REPLACED ON THE 
PART WRITE QUEUE (EPAWRTQ) . 



ILRVIOEQ 



Diagram 25.22 ILRSRTOl (Part 1 of 5) 
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| 06 | VALIDITY CHECK THE CURRENT 
PCCW. 



1 07 J VALIDITY CHECK ITS AIA. IF- 
VALID PUT IT ON THE PART 
AIA ERROR QUEUE. FREE THE 
PCCW. 

I 08 I FREE IOE'S USED BY ILRSRT.- 



|09| VALIDITY CHECK THE CURRENT 
I ORB. 

| 10| IF THE IORB IS INVALID, 

TRUNCATE THE IORB CHAIN IN 
THE PARTE AND IF AN IORB 
REMAINS, GOTO STEP 14. 



ASMPARTP 



| 06 | CALL ILRVPCCW TO VALIDITY CHECK 
THE CURRENT PCCW (PCCWPTR) IN 
THE PARMLIST. 

| 07 | THE AIA FROM THE PCCW IS 

VALIDITY CHECKED BY ILRVAIA. IF 
VALID IT IS PUT ON THE AIA ERROR 
QUEUE IN THE PART (PARTAIAE) . IF 
ILRSRT HAD A CONVERT ERROR (083 
ABEND) COPY THE AIA AND EDB TO 
THE VARIABLE RECORDING AREA IN 
THE SDWA. THE AIA FIELD IN THE 
PCCW IS SET TO ZERO AND THE PCCW 
IS RETURNED TO ITS POOL 
(ASMPCCWQ) . 

1 08 1 THE IOE'S ON THE ILRSRT FREE 
QUEUE (EPAFFIOE AND EPALFIOE) 
ARE VALIDITY CHECKED BY 
ILRVIOEQ. ANY VALID IOE'S ARE 
RETURNED TO THEIR POOL 
(ASMIOEPC) . 

| 09 | CALL ILRVIORB TO VALIDITY CHECK 
THE CURRENT IORB (IORBPTR IN 
PARMLIST) . 

| 1 | IF THE IORB IS INVALID, THE 



ILRVIOEQ 



CHAIN (PAREIORB) IS TRUNCATED. 
IF PAREIORB IS NOW NON-ZERO, GO 
TO STEP 14. 
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on 



IF THE IORB IS INVALID AND 
THERE ARE NO MORE ON THE 
PARTE, GET SQA STORAGE AND 
INITIALIZE A NEW IORB. 

IF ILRPTM WAS NOT 
PROCESSING AT TIME OF 
FAILURE GOTO STEP 15. 



13 RELEASE THE IORB. 



LE 



IF DSFULL ROUTINE WAS 
PROCESSING, WRITE THE 
PROPER MESSAGE AND PERFORM 
DATA SET FULL PROCESSING. 
GOTO STEP 21 . 



LUJ 



UB 



IF THE IORB IS INVALID AND 
PAREIORB IS ZERO, ISSUE A 
GETMAIN FOR SQA TO BUILD A NEW 
IORB, IOSB AND SRB. INITIALIZE 
THE REQUIRED FIELDS THEN CALL 
ILRVIORB TO FINISH THE 
CONSTRUCTION. STORE IN THE IORB 
THE ADDRESS IN PAREIORB AND GO 
TO STEP 14. IF THE GETMAIN FAILS 
SET PARENUSE=1 SINCE THIS PAGE 
DATA SET CANNOT BE USED. IF THE 
PARTE IS FOR A LOCAL PAGE DATA 
SET, DECREMENT TOTAL SLOTS 
AVAILABLE COUNT (ASMSLOTS) . 
WRITE MESSAGE ILR009I. GO TO 
STEP 22. 

IF ILRPTM WAS PROCESSING THERE 
IS NO I/O TO BE DONE AND 
POSSIBLY THE DSFULL ROUTINE IN 
ILRPTM FAILED. 

MAKE THE IORB AVAILABLE SINCE 
PROCESSING OF IT IS COMPLETE. 

IF THE DSFULL (DATA SET FULL) 
ROUTINE WAS PROCESSING, INSURE 
THAT THE PROPER MESSAGE IS 



Routine Label 



WRITTEN AND THE PARTE IS 
PROPERLY ADJUSTED (AS IF DSFULL 
HAD COMPLETED PROCESSING) . GO TO 
STEP 21 SINCE THERE IS NO I/O TO 
PERFORM. 



Routine Label 
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|15| VALIDITY CHECK THE PCCW 
CHAIN OFF THE IORB. 

| 16| IF NO PCCW REMAINS ON THE 
IORB, RELEASE THE IORB. 
GOTO STEP 21. 

|17| LOCATE THE LAST PCCW ON 
THE IORB. 

I 1 8 1 SET UP THE LAST PCCW ON 
THE IORB CHAIN FOR I/O 
PROCESSING. 





J 


f ' 


IORPCCW 






PCCW 


IORFUSE 


r'l 1 







DE 



03 



THE PCCW CHAIN (IORPCCW) IS 
VALIDITY CHECKED BY ILRVPCWQ AND 
A COUNT IS MAINTAINED FOR THE 
PCCW'S THAT ARE KEPT ON THE 
CHAIN. IF THE CURRENT PCCW 
(PCCWPTR) IS ON THE CHAIN, IT IS 
REMOVED. 

IF NO PCCW IS LEFT TO SEND TO 
IOS, RELEASE THE IORB AND 
CONTINUE AT STEP 21. 

FOLLOW THE PCCW CHAIN FROM 
IORPCCW AND FIND THE LAST ONE SO 
IT CAN BE UPDATED. 

THE LAST PCCW REMAINING ON THE 
IORB CHAIN IS SET UP AS FOLLOWS: 
-PCCWPCCW=0, -THE LAST CCW IS 
CHANGED TO A NOP AND CHAINING 
BITS ARE SET=0. 



ILRVPCWQ 
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EPAWRTCT 




EPACYLA 









1JT 



J 19| UPDATE THE CURRENT PATMAP - 
ENTRY WITH THE NEW MAP AND 
UPDATE THE SLOTS AVAILABLE 
COUNT IN THE PARTE. 

I 20 I ISSUE STARTIO. 



ED 



UNLOCK THE PARTE. 



22 SCHEDULE ILRPTM. 



RETURN TO RTM 



CURRENT 
PATMAP ENTRY 

| SCYLWRT | 
PARTE 








PARESLTA 











na 



THE CURRENT PATMAP ENTRY AND 
AVAILABLE SLOT COUNT IN THE 
PARTE (PARESLTA) ARE UPDATED, 
USING EPAWTPAT, EPACYLA AND 
EPAWRTCT . 

FIELDS IN THE IORB AND IOSB ARE 
SET UP FOR IOS. THE SRB FOR IOS 
IS OBTAINED AND THE COUNT OF SRB 
(ASMIOCNT) FOR ILRIOC00 TO 
PROCESS IS UPDATED. THEN STARTIO 
IS ISSUED TO PROCESS PCCW'S ON 
THE IORB . 

PAREFSIP IS SET TO TO. UNLOCK 
THE PARTE IF LOCKED BY CURRENT 
PART MONITOR (EPACPUID) . 



[22] SCHEDULE ILRPTM SO THAT ANY 

IOE'S OR AIA'S PUT BACK ON THE 
QUEUES WILL BE PROCESSED. 
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FROM RTM. 
(IEAVTRTS) 



1-TTnSDWAPARM 



J 



J IOSB 



to 



02 IF IT IS A RECORD-ONLY 
1 ' ABEND, GO TO STEP 20. 



03 IF NO IOSB IS 

1 • CHECKPOINTED, GO TO STEP 

22. 



I 05 I IF IOSB-IORB-SRB IS NOT 
1 1 VALID, GO TO STEP 22. 



ILRCMP01 IS THE RECOVERY ROUTINE 
FOR ALL FOUR ENTRIES OF ILRCMP. 
THE ATA WILL ALWAYS BE RECORDED 
IN THE SDWA VARIABLE RECORDING 
AREA. THE MODID WILL BE SET IN 
THE SDWA IF NOT PERCOLATED TO. 



FOR A RECORD-ONLY ABEND (X'084', 
REASON CODE 4), ILRCMP WILL BE 
RESCHEDULED WITH A X'45' IN 
IOSCOD. 



HAS BEEN FREED OR THE ABEND 
OCCURRED BEFORE PROCESSING 
BEGAN. NO RECOVERY CAN BE DONE, 
SO GO TO STEP 22. 



THE IOSB-IORB-SRB WILL BE 
VALIDITY CHECKED FOR CERTAIN 
BASIC FIELDS AND THEN THE 
REMAINING FIELDS REFRESHED. 



05 IF THE IOSB IS NOT VALID, NO 
1 ' RECOVERY IS DONE. GO TO STEP 22. 



Label 
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ATACPCCW 



AIAQUEUE 



ATAPCCWQ 



ATACPCCW 



y 



SCCW/PCCW QUEUE 



Output 



1 06 1 IF NO AIA'S TO RETURN TO 
1 — -J ILRPAGCM, GO TO STEP 9. 



1 07 I VALIDITY CHECK THE AIA 
1 1 QUEUE. 



08 PUT ALL VALID AIA'S ON 

1 1 PARTAIAE FOR LATER RETURN 

TO ILRPAGCM. 



09 IF NO SCCW/PCCW S TO 

1 1 RETURN TO THE AVAILABLE 

QUEUE, GO TO STEP 12. 



1 10 1 VALIDITY CHECK THE 
1 ' SCCW/PCCW QUEUE. 



PART 












PARTAIAE 














1 




1 










AIAQUEUE 



I 06 I AIA'S TO BE RETURNED TO ILRPAGCM 
1 > ARE CHECKPOINTED IN ATACOMPQ. 



BEFORE AIA'S ARE SENT TO THE 
VALIDITY CHECK ROUTINE, THE AIA 
POINTED TO BY THE CURRENT S/PCCW 
7ATACPCCW) WILL BE COMPARED WITH 
THE FIRST AIA ON THE ATACOMPQ 
QUEUE. IF A MATCH IS FOUND, THE 
AIA POINTER IN ATACPCCW IS SET 
TO ZERO SINCE THIS AIA ALREADY 
HAD BEEN PROCESSED BY ILRCMP 
BEFORE THE ERROR OCCURRED. THEN 
THE AIA ? S ARE VALIDITY CHECKED. 



08 1 IF A NON-ZERO QUEUE IS RETURNED, 

1 » AIA'S ARE PUT ON PARTAIAE (PART 

AIA ERROR QUEUE) . ILRPTM MUST BE 
SCHEDULED LATER. 



S/PCCW 'S TO BE RETURNED TO THE 
AVAILABLE QUEUE ARE CHECKPOINTED 
IN ATAPCCWQ. 



BEFORE THE SCCW/PCCW 'S ARE SENT 
TO THE VALIDITY CHECK ROUTINE, 
ATACPCCW WILL BE COMPARED TO THE 
FIRST SCCW/PCCW ON THE QUEUE. IF 
A MATCH IS FOUND, THE ATACPCCW 
IS SET TO ZERO SINCE THIS PCCW 
ALREADY HAD BEEN PROCESSED BY 
ILRCMP BEFORE THE ERROR 
OCCURRED. THEN THE VALIDITY 
CHECK ROUTINE IS CALLED. 



ILRFRR01 
ILRFRR01 



Label 



ILRVAIAQ 



ILRVSCWQ 
ILRVPCWQ 



25.27. 
13 
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I 11 I PUT ALL VALID SCCW/PCCW'S 
•—J ON THE AVAILABLE QUEUE. 



I 1 2 I IF THERE IS NO CURRENT 
1 ' SCCW/PCCW, GO TO STEP 18. 



I 1 3 I VALIDITY CHECK THE 
1 1 SCCW/PCCW QUEUE. 



14 IF THE SCCW/PCCW QUEUE IS 

I 1 VALID, VALIDITY CHECK THE 

AIA IF IT IS PRESENT. 



ASMVT 












ASMPCCWA 














1 




1 






SART 


PCCW 








SARSCCWQ 














1 




1 










SCCW 



PART 


AIA 




J> l 1 


PARTAIAE 









cm 



IF THE SCCW/PCCW' S ARE VALID, 
THEY ARE RETURNED TO THE 
APPROPRIATE AVAILABLE QUEUE. 



THE CURRENT SCCW/PCCW IS 
CHECKPOINTED IN THE ATACPCCW. 
THE AIA POINTER MAY BE ZERO. THE 
SCCW/PCCW MAY BE ON THE IORB 
CHAIN, OR THE ATAPCCWQ. SPECIAL 
CARE MUST BE TAKEN TO INSURE 
THAT NEITHER AN AIA NOR A 
SCCW/PCCW IS PROCESSED TWICE BY 
ILRSRT. 



13 THE SCCW/PCCW IS CHECKED AGAINST 

1 1 THE IORPCCW/IORSCCW FIELD. IF A 

MATCH IS FOUND, THE ATACPCCW 
WILL BE ZEROED AND CONTROL SENT 
TO STEP 18. IF NOT, THE 
SCCW/PCCW IS VALIDITY CHECKED. 



I 14| IF PCCWAIA/SCCWAIA IS NONZERO, 
1 1 THE AIA IS VALIDITY CHECKED. 



ILRFRR01 
ILRFRR01 



ILRVSCWQ 
ILRVPCWQ 
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IF THE AIA IS VALID, MARK 
IT AS AN ERROR OR A RETRY 
AND PUT IT ON THE 
PARTAIAE . 



SET THE PCCWAIA/SCCWAIA TO 
ZERO. 



QZ) 



PUT THE SCCW/PCCW ON THE 
APPROPRIATE AVAILABLE 
QUEUE. REPEAT STEPS 14-17 
FOR ALL ON THE CURRENT 
QUEUE . 



VALIDITY CHECK THE QUEUE 
OF SCCW/PCCWS CHAINED OFF 
THE IORB. 



19 IF ILRPTM IS TO BE 

' ' SCHEDULED, TURN ON THE 

SCHEDULE BIT. 



SCHEDULE SRB FOR ILRCMP. 



±?=> 



ASMVT PCCW 








^ 






ASMPCCWA 










SART 


SCCW 








** 






SARSCCWQ 










ASMVT 


SRB 








^ 






ASMPSRB 








IOSB 














IORB 




IOSSRB 






J 




IORIOSB 












SRB 























SINCE THE STATUS OF THIS AIA IS 
UNSURE, MARK IT AS A RETRY IF 
THERE IS ONLY ONE AIA. IF THERE 
IS A CHAIN OF AIAS, MARK IT AS 
AN ERROR SINCE IT MUST BE FOR 
BADPACK PROCESSING. 



THE AIA POINTER IS ALWAYS ZERO 
FOR A SCCW/PCCW ON THE AVAILABLE 
QUEUE . 



un 



WHATEVER REMAINS ON THE IORB IS 
PROCESSED BY THE MAINLINE 
TERMINATION ROUTINE - ILRCMP. 



IF ANY AIA' S WERE PUT ON THE 
PARTAIAE QUEUE, ILRPTM SHOULD BE 
SCHEDULED. THE SCHEDULE COUNT IS 
CHECKED TO DETERMINE IF ILRPTM 
IS ALREADY SCHEDULED. 



ILRCMP SHOULD BE RESCHEDULED 
USING THE SRB POINTED TO BY THE 
IOSB. A X'45' WILL BE PUT IN THE 
IOSB. 



ILRFRR01 
ILRFRR01 



ILRVSCWQ 
ILRVPCWQ 
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TO ILRMSG00. 



A. IF THE IOSB WAS LOST OR 
IF THE AIA T S WERE PUT 
ON THE PART ERROR 
QUEUE. SCHEDULE ILRPTM 
AND/OR ILRSWPDR SRB, IF 
NECESSARY. 

B. SCHEDULE ILRPTM SRB. 



mi 



IF THE ERROR WAS IN THE BADPACK 
SUBROUTINE, COMPLETE SETTING UP 
OF PARAMETER LIST AND CALL 
ILRMSG00. UNCONDITIONALLY SET 
THE BADPACK FLAG IN THE PARTE OR 
THE SARTE. 



IF THE IOSB WAS LOST 
?ATAIOSB=0) OR THE AIAS WERE 
PUT ON THE PARTAIAE QUEUE, 
ILRPTM MUST BE SCHEDULED IF 
IT IS NOT ALREADY SCHEDULED. 
IF THE IOSB WAS LOST FOR A 
SWAP DATA SET THEN SWAP 
DRIVER IS ALSO SCHEDULED. 



SRB IF IT IS NOT ALREADY 
SCHEDULED. 



FOR ILRCMPAE OR ILRCMPDI, IOS 
FRR WILL GET CONTROL AND SET THE 
IOSCOD TO X'45 T . FOR IORIOC00 
THERE IS NO FRR BELOW ILRCMP01 
BUT ILRCMP HAS BEEN RESCHEDULED. 



Routine Label 
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FROM RTM 
(IEAVRTS) 



to 



|01| ILRGOS01: SET FRR 
INDICATOR IN SDWA. 

foT] INDICATE SALLOC AND ASM 
CLASS LOCKS TO BE FREED. 
GOTO STEP 5. 

[ol] ILRCGOSE: IF A SDWA WAS 
NOT OBTAINED, SET THE 
CONTINUE-WITH-TERMINATION 
INDICATOR AND RETURN TO 
RTM. 



| 04 | SET THE ESTAE INDICATOR IN- 
SDWA. 

1 05 1 SET THE RECORD INDICATOR 
IN SDWA. 



R 1 SDWA 




I H' 








SDWACOMP 


SDWAACE3 




R 1 


5DWA 




I I *' 




I I ' * 








SDWACOMP 











|01| ILRGOS01 IS THE RECOVERY ROUTINE 
FOR ILRGOS, ILRRLG, ILRACT, 
ILRSAV, AND ANY OF THEIR PATHS 
THROUGH ILRVSAMI. IT IS AN FRR 
FOR ILRGOS AND ILRRLG, AN ESTAE 
FOR THE OTHERS. FOR FRR ENTRY 
POINT, COMMUNICATION FIELD IN 
SDWA(SDWAPARM) WILL BE USED TO 
INDICATE WHETHER THIS IS THE FRR 
OR ESTAE PROCESSING. THE FRR 
WILL SET THE FIELD TO ZERO. 

[oJj WHEN ILRGOS RECEIVED CONTROL AND 
ESTABLISHED THE FRR, THE LOCAL 
LOCK WAS THE ONLY LOCK HELD. ALL 
OTHER LOCKS OBTAINED DURING 
MAINLINE OR RECOVERY PROCESSING 
SHOULD BE FREED BEFORE 
PERCOLATING TO VBP'S RECOVERY. 
GO TO STEP 5. 

[0?] THIS IS THE ESTAE ENTRY POINT 
GIVEN CONTROL BY RTM ROUTINE 
IEAVTAS1. IF NO SDWA WAS 
OBTAINED BY RTM, RECOVERY IS NOT 
ATTEMPTED. 

[04| THE COMMUNICATION FIELD IN THE 



SDWA IS SET TO NON-ZERO FOR 
ESTAE PROCESSING. WHEN THE 200 
BYTE WORKAREA IS OBTAINED ITS 
ADDRESS WILL BE PUT IN THAT 
FIELD. 

COMMON PROCESSING FOR ESTAE AND 
FRR - SDWA HAS BEEN OBTAINED. 
THE SDWA IS MARKED TO BE 
RECORDED IN SYS1.LOGREC. 
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06 MOVE THE ATA TO THE SDWA. 



t°z] 



03 



IF EPATH IS NOT 
CHECKPOINTED, RETURN TO 
RTM TO CONTINUE WITH 
TERMINATION. 



MOVE THE EPATH TO THE 
SDWA. 

SET THE APPROPRIATE 
RECOVERY ROUTINE NAMES IN 
THE SDWA. 

IF IT IS A RECORD-ONLY 
ABEND AND RETRY IS 
POSSIBLE, SET UP FOR RETRY 
AND RETURN TO RTM. 



INDICATE IN THE SDWA TO 
CONTINUE WITH TERMINATION. 



R 1 SDWA 


I H* 






SDWARA 







SDWA 










SDWARA 











n>D 



THE ATA IS RECORDED IN THE 
VARIABLE RECORDING AREA 
(SDWARA) . 

IF THE EPATH HAS NOT BEEN 
CHECKPOINTED, NO RECOVERY IS 
ATTEMPTED. 

THE EPATH IS RECORDED IN THE 
VARIABLE RECORDING AREA. 

THE ROUTINE IN CONTROL AT THE 
TIME OF ERROR IS DETERMINED FROM 
THE ATA AND THE PROPER MODULE, 
CSECT, AND THE RECOVERY NAME IS 
PUT IN THE SDWA. 

IF IT IS A RECORD-ONLY ABEND 
(X'COD', X'085', X\086', OR 
X'087'), SET UP THE RETRY 
REGISTERS FROM THE EPATH 
POINTER, INDICATE RETRY AT THE 
NEXT SEQUENTIAL INSTRUCTION, AND 
RETURN TO RTM. 



|"iT| IF IT IS NOT A RECORD-ONLY ABEND 
OR RETRY IS IMPOSSIBLE, THEN 



INDICATE IN THE SDWA TO CONTINUE 
WITH TERMINATION. 
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| 12| IF ESTAE ENTRY, PREPARE 

THE ENVIRONMENT TO ENABLE 
COMMON PROCESSING. 



£F* 



| T 3 | SET UP THE COMMON 

REGISTERS AND LOCKS. 



IF 



THE NECESSARY LOCKS CANNOT 
BE OBTAINED, RETURN TO 
RTM. 



m 



| 14| IF THE ACE IS 

CHECKPOINTED, VALIDITY 
CHECK THE ACE. IF THE ACE 
IS INVALID, SET THE ACE 
POINTER TO ZERO. 

| 1 5 | IF THE ACTIVE ASPCT IS 
CHECKPOINTED, IT IS 
ADDRESS VERIFIED AND THEN 
THE LGE IS VERIFIED. ANY 
ERROR INDICATOR CAUSES THE 
APPROPRIATE POINTER TO BE 
ZEROED. 



7=> 



]r»\ 



CD 



03 



IF ESTAE ENTRY: 

A. OBTAIN A 200 BYTE WORKAREA. 
EACH FRR IS PASSED ONE. 

B. IF ILRVSAMI HAD CALLED VSAM 
(POSSIBLE ONLY IF ESTAE 
ENTRY) , VSAM MUST BE ALLOWED 
TO CLEAN UP ITS RESOURCES. 
THE ENDREQ MACRO IS ISSUED. 

C. IN PREPARATION OF OBTAINING 
THE SALLOC LOCK, PAGE FIX THE 
SDWA. SDWA IS FIXED IF FRR 
ENTRY. 

FOR COMMON RECOVERY PROCESSING, 
MAKE BOTH ENTRY POINTS HOLD THE 
SAME LOCKS AND SET UP COMMON 
REGISTERS. FOR THE ESTAE ENTRY 
POINT, THE LOCAL, SALLOC, AND 
ASM LOCKS ARE OBTAINED. FOR THE 
FRR ENTRY, THE LOCAL LOCK WAS 
ALREADY HELD AND THE OTHER LOCKS 
MAY BE HELD. THE SALLOC AND ASM 
LOCKS ARE OBTAINED. IF THE ASM 
WAS HELD AND THE SALLOC CANNOT 
BE OBTAINED CONDITIONALLY, NO 
RECOVERY IS DONE AND CONTROL IS 



ENDREQ 



RETURNED TO RTM. 

| 14J IF THE ACE IS CHECKPOINTED IT IS 
VALIDITY CHECKED. IF THE POINTER 
IS INVALID, THE ACE POINTER IN 
THE EPATH IS SET TO ZERO. 

|l5| IF THE ACTIVE ASPCT IS 

CHECKPOINTED, ADDRESS VERIFY THE 
ASPCT. IF THE ADDRESS IS 
INVALID, SET THE POINTER TO THE 
ACTIVE ASPCT TO ZERO. IF ASPCT 
ADDRESS IS VALID, VERIFY THE LGE 
ADDRESS IN THE ASPCT. IF LGE 
ADDRESS IS INVALID, ZERO POINTER 
TO LGE IN ASPCT. 



ILRFRR0 1 
IEAVEADV 



ILRVLGE 
IEAVEADV 
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|16| IF AN ACTIVATE REQUEST WAS 
PROCESSING: 



A. FREE THE ACE. 

B. IF EPALGEP IS 
CHECKPOINTED, ZERO 
LGESLTCT, THEN CALL 
ILRFRELG TO FREE THE 
LGE AND MAKE THE LGVTE 
AVAILABLE. 

C. INCREMENT THE BUFFER 
COUNT BY 1 IN ASMVT. 



lizO 



l! 



ASMREQCT 



|l6| IF AN ACTIVATE REQUEST WAS 
PROCESSING, CLEAN UP ANY 
RESOURCES OBTAINED ON BEHALF OF 
THIS REQUEST. 

A. IF THE ACE IS STILL 
CHECKPOINTED, DEQUEUE THE ACE 
FROM THE PROCESS QUEUE AND 
RETURN IT TO THE ACE POOL. 

B. IF AN LGE WAS OBTAINED, 
ILRFRELG IS CALLED TO FREE 
STORAGE AND MAKE THE LGVTE 
AVAILABLE. 

C. THE BUFFER COUNT IN THE ASMVT 
MUST BE INCREMENTED SO THAT 
THE GROUP OPERATORS CAN 
CONTINUE TO DO I/O. 
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|17| IF AN ASSIGN REQUEST WAS 
PROCESSING: 

A. ADJUST THE BACKING 
SLOTS COUNT IN THE 
ASMVT. 

B. IF THE SRB IS 
CHECKPOINTED, FREE 
STORAGE. 

C. IF THE LGVT IS 
CHECKPOINTED, FREE 
STORAGE. 

D. IF THE LGE IS 
CHECKPOINTED, FREE 
STORAGE. 



r 



I H* 






ASMBKSLT 


R 4 





t 



r 



G3 



IF AN ASSIGN REQUEST IS BEING 
PROCESSED, CLEAN UP ANY 
RESOURCES OBTAINED ON BEHALF OF 
THIS REQUEST. 

A. IF EPAASGN IS ON, THE BACKING 
SLOTS COUNT OBTAINED FOR THIS 
LOGICAL GROUP MUST BE 
RETURNED. THE NUMBER OF SLOTS 
RETURNED IS ADDED TO THE 
ASMBKSLT COUNT IN ASMVT. 

B. IF THE SRB IS CHECKPOINTED, 
FREE THE SRB STORAGE. 

C. IF THE LGVT IS CHECKPOINTED, 
FREE THE LGVT STORAGE. 

D. IF THE LGE IS CHECKPOINTED, 
CALL ILRFRELG TO FREE LG 
RELATED STORAGE. IF 
UNSUCCESSFUL, FREE THE LGE 
STORAGE. 



ILRGOS 
FREEMAIN 
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IF A RELEASE LOGICAL GROUP- 
REQUEST WAS PROCESSING: 

A. TURN OFF THE WORK 
PENDING FLAG IN THE 
LGE. 

B. IF THE LGE IS 
CHECKPOINTED, FREE THE 
STORAGE. 





J ' 




ACELGE 


LGEWRKPD 







1 18 1 IF A RELEASE LOGICAL GROUP 

REQUEST WAS PROCESSING (ILRRLG) , 
ALLOW THE REQUEST TO REMAIN ON 
THE PROCESS QUEUE UNTIL MEMORY 
TERMINATION. 

A. THE WORK PENDING FLAG IN THE 
LGE BEING OFF PREVENTS THE 
SRB CONTROLLER FROM 
PROCESSING THIS LGE. 

B. IF THE LGE IS STILL 
CHECKPOINTED, IT HAS NOT BEEN 
QUEUED, SO THIS SQA IS FREED. 
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|19| IF A SAVE REQUEST WAS 
PROCESSING: 

A. IF THE SAVE FLAG IS OFF 
IN THE ASPCT, SET THE 
"S* SYMBOL IN THE 
ASPCT . 

B. IF THE SAVE FLAG IS OFF 
OR THE EPAUNSAV FLAG IS 
ON, CALL ILRALS00 TO 
MARK ALL THE LPME'S IN 
THE ACTIVE ASPCT AS 
UNSAVED. 

C. DEQUEUE THE ACE FROM 
THE LGE. 

D. TURN ON THE 
WORK-PENDING FLAG AND 
THE SAVE- 

REQUEST-QUEUED FLAG IN 
THE LGE, IF NECESSARY. 

E. TURN OFF THE 
GROUP-IN-PROCESS FLAG 
IN THE LGE . 

F. FREE THE ACE. 

G. INCREMENT THE BUFFER 
COUNT IN THE ASMVT BY 1 





J * 




EPAAASP 


ASPSSYM 






EPAACE 





r 



LGESAVRQ 



I ll ^ASMVT 








ASMREQCT 







|19| IF ILRSAV WAS PROCESSING, CLEAN 
UP THE RESOURCES OBTAINED FOR 
THIS REQUEST. 

A. IF THE ASPCT HAS NOT BEEN 
MARKED SAVE, ZERO THE 'S' 
SYMBOL SO THAT FUTURE RELEASE 
REQUEST WILL BE HONORED. 

B. IF THE ASPCT HAS NOT BEEN 
MARKED SAVED OR, IF THE 
EPAUNSAV FLAG IS ON, MARK ALL 
LPME'S AS UNSAVED. THIS WILL 
ALLOW SLOTS TO BE FREED 
LATER. 

C. THE ACE SHOULD BE THE FIRST 
ACE ON THE LGE PROCESS QUEUE 

(LGEPROCQ) . 

D. THE WORK-PENDING AND THE 
SAVE-REQUEST FLAGS IN THE LGE 
ARE TURNED OFF. IF MORE ACE'S 
ARE QUEUED, THE WORK-PENDING 
FLAG IS TURNED ON. IF MORE 
SAVE REQUESTS EXIST ON QUEUE, 
THE SAVE- REQUEST-QUEUED FLAG 
IS TURNED ON. 

E. THE GROUP-OP FLAG WAS ON 



DURING THE SAVE TO SERIALIZE 
WORK BEING DONE FOR THIS LGE. 

THE ACE IS FREED AND RETURNED 
TO THE POOL VIA ILRGMA. 

THE BUFFER COUNT IN THE ASMVT 
SHOULD BE INCREMENTED BY 1 TO 
ALLOW ADDITIONAL I/O 
PROCESSING BY THE GROUP 
OPERATORS . 



Diagram 25.24 ILRGOSOl (Part 7 of 8) 
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Input 



L 



Processing 



| 20 | CLEAN UP ANY REMAINING 
STORAGE. 

| 21 | IF ESTAE ENTRY POINT, FREE 
WORKAREA, LOCKS, AND SDWA. 

| 22 | RETURN TO RTM TO CONTINUE 
WITH TERMINATION. 



Output 




\E 



ANY WORKAREAS OR CONTROL BLOCKS 
STILL CHECKPOINTED AT THIS POINT 
ARE FREED. IN PREVIOUS STEPS 
WHERE AREAS HAVE BEEN FREED, THE 
EPATH POINTERS HAVE BEEN 
CLEARED. 

IF ESTAE ENTRY POINT, THE 200 
BYTE WORKAREA MUST BE FREED, ALL 
LOCKS OBTAINED MUST BE FREED, 
AND THE SDWA MUST BE PAGE FREED. 

THE SDWA HAS ALREADY BEEN SET UP 
TO CONTINUE WITH TERMINATION. 



FREEMAIN 

SETLOCK 

PGFREE 



Diagram 25.24 ILRGOSOl (Part 8 of 8) 
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VS2.03.807 



Input 



Processing 



Output 



| REG 



JT-* 



K 



ATAAIAQ 



ATAACEQ 



J 



SDWAPARM 



FROM RTM 
(IEAVTRTS) 



to 



r | PSAAOLD 
ASCB 



RSMHD 






ASHLGEQ 






ASHLOCK 








ILRSRB01: 



01 SET UP COMMON REGISTERS 

' 1 AND PERFORM COMMON 

INITIALIZATION. 



02 IF SRB CONTROLLER ISSUED A 

1 ' COD ABEND, SET UP FOR 

RETRY AND RETURN TO RTM. 




04 CALL ILRCQIOE FOR AN ERROR 
1 1 OCCURRING IN ILRQIOE. 



06 SKIP TO STEP 14 FOR AN 

1 ' ERROR THAT OCCURRED DURING 

ILRSRBC ENTRY PROCESSING. 



07 VALIDITY CHECK THE ASMHD 

1 ' LGE QUEUE. IF THE LGE 

QUEUE IS TRUNCATED, 
TERMINATE THE ERROR MEMORY 
AND SKIP TO STEP 14. 



Lb^> 



| REG 1 


|r 


SDWA 


*l I 






I I 






|REG 2 


h 


RSMHD 






'I I 






| REG 3 


|l 


ASMVT 




I 




'I I 


| REG 4 


h 






| 


ATA 




*l I 


| REG 8 


h 


I I 





PLACE THE NECESSARY POINTERS IN 
REGISTERS TO STANDARDIZE THE 
INTERFACE TO RECOVERY 
SUBROUTINES. COMMON 
INITIALIZATION INCLUDES: SETTING 
THE FRR WORKAREA TO ZERO AND 
COPYING THE ATA INTO THE SDWA. 



THE SRB CONTROLLER ISSUES A COD 
ABEND FOR AN AIA THAT DOES NOT 
CONTAIN A LOGICAL TO PHYSICAL 
MAPPING ENTRY JLPME) . THE SDWA 
IS SET UP FOR RETRY AT THE NEXT 
SEQUENTIAL INSTRUCTION AFTER THE 
ABEND. MODULE, CSECT, AND 
RECOVERY ROUTINE IDS ARE COPIED 
INTO THE SDWA. A RETURN IS 
ISSUED TO RT/M. 



THIS ROUTINE PERCOLATES FOR 
UNEXPECTED ABENDS. THE MODULE. 
CSECT. AND RECOVERY ROUTINE IDS 
ARE COPIED INTO THE SDWA. SDWA 
FLAGS, WHICH REQUEST THAT RT/M 
FREE THE ASM CLASS, SALLOC, AND 
LOCAL LOCKS, ARE TURNED ON. 
RT/JTS DEFAULT RECORDING 
PROCEDURE IS USED. 



A FLAG IN THE ATA (ATAQIOE) 
INDICATES THAT ILRQIOE WAS IN 
CONTROL AT THE TIME OF ERROR. 
ILRSRBC 'S AIA PROCESSING IS 
COMPLETED BEFORE THE CALL TO 
ILRQIOE. THE SDWA CSECT ID 
TSDWACSCTj IS RESET TO ILRQIOE. 
THE CALL TO ILRCQIOE MUST BE 
DONE PRIOR TO OBTAINING THE ASM 
CLASS LOCK. 



THE LOCK MAY HAVE BEEN HELD ON 
ENTRY. THE LOCK IS USED TO 
SERIALIZE ASM PROCESSING FOR 
THIS MEMORY. IT WILL BE FREED BY 
RT/M ON PERCOLATION. 



IF SRB CONTROLLER'S MODID IS NOT 
INITIALIZED IN THE ATA, IT IS 
NOT NECESSARY TO PERFORM QUEUE 



ILRCQIOE 



25.20. 
1 



VERIFICATION. THE SRB SCHEDULED 
FLAG IN THE ASM HEADER 
(ASHSCHED) IS TURNED OFF TO 
INSURE THAT THE SRB CONTROLLER'S 
SRB IS RESCHEDULED. 



CALL ILRVLGEQ TO VERIFY EACH LGE 
ON THE ASM HEADER LGE QUEUE 

(ASHLGEQ) AND THE PROCESS QUEUE 
ANCHORED IN THE LGE (LGEPROCQT. 
ASM CANNOT BE ALLOWED TO PROCESS 
AYN FUTURE REQUESTS FOR THIS 
MEMORY ON A LOGICAL GROUP ENTRY 

(LGE) THAT MAY NOT EXIST. 
TERMINATE THE MEMORY USING THE 
ERROR SYSTEM COMPLETION CODE 

(SDWACMPC) . ILRTERMR WILL 
RECOVER ASM RESOURCES. 



ILRFRR01 
ILRFRR01 
CALLRTM 



Label 



ILRVLGEQ 
ILRVLPRQ 



25.27. 
2 



Diagram 25.25 ILRSRBOl (Part 1 of 3) 
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Input 



Processing 



ATAACEQ 



1 



Output 



VALIDITY CHECK A CURRENT 
AIA OR ACE CHECKPOINTED IN 
THE ATA. 



PERFORM UNIQUE PROCESSING 
FOR A TRANSFER PAGE ACE 
CHECKPOINTED IN THE ATA. 
SKIP TO STEP 12. 



09 



Q<D 



SRB CONTROLLER MAINTAINS IN THE 
ATA A LIFO QUEUE OF GROUP 
OPERATION ACES TO BE PROCESSED. 
AFTER VALIDITY CHECKING THE 
QUEUE, SET THE GROUP OP IN 
PROCESS FLAG (LGEGRINP) AND WORK 
PENDING FLAG UjGEWRKPDJ IN THE 
ASSOCIATED LGETaCELGEI SO THAT 
SRB CONTROLLER WILL REPROCESS 
THE ACES ON THIS INTERNAL QUEUE. 



VALIDITY CHECK THE CURRENT ACE 
(ILRTRANS PROCESSING) OR AIA 
(ILRESTRT PROCESSING) . THE FIELD 
ATAAIA MAY BE EITHER AN ACE OR 
AN AIA. AN ACE IS IDENTIFIED BY 
THE TRANSFER PAGE ACE OPERATION 



CODE (ACEOP»X 1 04 T ). 



IF THE ACE TARGET LPME 
TACETLPME IS MARKED VALID AND 
NOT SAVED. MARK THE LPME INVALID 
TO AVOID FREEING A SLOT 
TWICE. (IN NORMAL PROCESSING. IF 
THE TARGET LPME IS MARKED VALID 
BUT NOT SAVED, THE SLOT IS 
FREED. SINCE IT MAY HAVE BEEN 
FREED BEFORE THE ERROR OCCURRED, 
FREEING IT AGAIN WILL ALLOW 
ILRSRT TO ALLOCATE IT TWICE. IF 
IT HAD NOT BEEN FREED BEFORE THE 
ERROR, THE SLOT IS NEVER FREED.) 
TURN ON THE WORK PENDING FLAG 
FOR THE LGE TaCELGE) SO THAT 
THIS ACE IS* REPROCESSED BY THE 
SRB CONTROLLER. 



ILRVACEQ 



25.27. 
8 



Diagram 25.25 ILRSRBOl (Part 2 of 3) 
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Input 



Processing 



Output 



ATAAIAQ 



J7 



CVTASMVT i-* 



E3 



A. IF AN ERROR FLAG IS ON 
IN THE AIA, ADD THE AIA 
TO THE PART ERROR 
QUEUE. SKIP TO STEP 12. 

B. IF THE AIA IS CURRENTLY 
LAST ON THE ASMVT 
STAGING QUEUE, DEQUEUE 
IT FROM THE INTERNAL 
QUEUES. SKIP TO STEP 

C. IF IT IS A WRITE AIA, 
INVALIDATE ITS 
ASSOCIATED LPME. 

I 1 2 j VALIDITY CHECK THE ASMVT 
1 1 STAGING QUEUE. 



I 1 3 I PROCESS THE INTERNAL QUEUE 
I 1 f)F ATA T S 



14 SCHEDULE THE SRB 

1 ' CONTROLLER'S SRB, IF 

NECESSARY. 



QE 



RETURN TO CALLER. 



11 IF AN AIA WAS CURRENTLY BEING 

1 1 PROCESSED BY ILRESTRT, IT IS 

NECESSARY TO DETERMINE THE STAGE 
OF PROCESSING FOR THE AIA. 



IF AN ERROR FLAG IS ON IN THE 
CURRENT AIA, IT IS DEQUEUED 
FROM THE INTERNAL AIA QUEUE 
POINTED TO BY THE ATA AND 
ADDED TO THE PART ERROR QUEUE 
(PARTAIAE) . 



DEQUEUEING THE AIA FROM THE 
INTERNAL AIA QUEUE INSURES 
THAT THIS AIA WILL NOT BE 
SETUP FOR REPROCESSING BY 
THIS RECOVERY. 



THE SLOT ASSOCIATED WITH A 
WRITE AIA MAY HAVE ALREADY 
BEEN FREED. INVALIDATING THE 
LPME INSURES THAT IT WILL NOT 
BE FREED AGAIN. 



THE VALIDITY CHECKING ROUTINE 
REMOVES A PARTIALLY QUEUED AIA. 



SRB CONTROLLER MAINTAINS A QUEUE 
OF STARTABLE AIAS (ATAAIAQ) 7 THE 
CURRENT AIA (ATAAIACE) 
REPRESENTS THAT PART OF THE AIA 
OUEUE NOT YET PROCESSED BY THE 
RESTART SUBROUTINE. IF THE 
CURRENT AIA IS NOT ZERO. RESET 
THE INTERNAL QUEUE TO THE 
CURRENT AIA. VALIDITY CHECK THE 
INTERNAL QUEUE OF AIAS. TURN OFF 
THE AIA IN PROCESS FLAG AND TURN 
ON THE LGE WORK PENDING FLAG FOR 
EACH AIA ON THE INTERNAL QUEUE 
IN ORDER TO ALLOW THESE AIAS TO 
BE REPROCESSED BY ILRSRBC. 



THE SRB CONTROLLER'S SRB IS 
RESCHEDULED IF NOT ALREADY 
SCHEDULED. THE ASM HEADER 
SCHEDULE FLAG, ASHSCHED. IS 
TURNED ON TO INDICATE THE SRB 
CONTROLLER IS SCHEDULED FOR THIS 
MEMORY. 



ILRVASGQ 



ILRVAIAQ 



IF RELEASE LOGICAL GROUP WAS IN 
CONTROL AT THE TIME OF ERROR, AN 
ACTIVE ASPCT (EPAASP) AND A 
WORKAREA CELL (EPAOWRK) MAY BE 
CHECKPOINTED IN THE EPATH. THE 
ACTIVE ASPCT ADDRESS IN THE 
ASSOCIATED LGE (LGEASP1 IS 
CLEARED TO PREVENT FREEING THE 
ASPCT T S SLOTS TWICE IN THE EVENT 
OF ANOTHER RELEASE LOGICAL GROUP 
REQUEST FOR THE LGE. THE 
WORKAREA CELL IS FREED. 



SRB CONTROLLER'S WORKAREA CELL 
IS CHECKPOINTED IN THE 
EPATH (EPASWRK) . 



25.25. 



03 



Diagram 2S.25 ILRSRBOl (Part 3 of 3) 
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Input 



Processing 



Output 



to 



FREECELL: 

| 1 | IF THE WORKAREA CELL 
ADDRESS IS NOT ZERO, 
VERIFY THE STORAGE 
ADDRESS . 

I 02 I FREE A VALID CELL ADDRESS. 



03 RETURN TO CALLER. 




1 01 I THE STORAGE POINTED TO BY THE 
WORKAREA CELL ADDRESS IS 
VERIFIED TO BE ADDRESSABLE AND 
FREE OF STORAGE CHECKS. 

| 02 | IF THE STORAGE IS VALID THE 

WORKAREA CELL IS RETURNED TO THE 
PROPER ASM CELL POOL. 



Diagram 25.25.1 FREECELL (Part 1 of 1) 



Section 2: Method of Operation 5-299 



VS2.03.807 



Input 



Processing 



REG 


EPATH 


1 


|X'0C" | 
REG 2 








EPATMI 




EPARECUR 




1 l J 















Lb 



Output 



IF ILRTMRLG IS ALREADY 
UNUSABLE OR THIS ERROR HAS 
ALREADY BEEN RETRIED, 
PERCOLATE. 



1 02 1 IF RTM DID NOT PASS A 
SDWA: 

A. IF MASTER SCHEDULER 

INITIALIZATION (M.S.I.) 
IS POSTED, GOTO 
SETRETRY . 



B. IF M.S.I. IS NOT 
POSTED, PERCOLATE. 



TO SETRETRY 



1 1 I ILRTMI01 IS THE RECOVERY ROUTINE 
FOR ILRTMRLG AND ILRTMI00. IF 
ASMNOTMR=1 OR EPARECUR=1 , A 
DOUBLE ERROR HAS OCCURRED SO SET 
: ASMNOTMR TO ONE, IF NOT ALREADY, 
AND PERCOLATE. 

[oT) RTM COULD NOT OBTAIN A SDWA. 

A. IF RTM DID NOT PASS A SDWA, 
THERE IS NO WAY TO TELL RTM 
TO RETRY WITH UPDATED 
REGISTERS. IF MASTER 
SCHEDULER INITIALIZATION HAS 
BEEN POSTED (EPAMAST*1 ) , 
ILRTMRLG MAIN LINE CODE WAS 
PROCESSING, THUS WE HAVE 
ENOUGH INFORMATION TO DO A 
SPECIAL RETRY. 

B. IF MASTER SCHEDULER 
INITIALIZATION IS NOT POSTED 
AND RTM COULD NOT GET STORAGE 
FOR A SDWA, PERCOLATE AND 
ALLOW M.S.I. TO TERMINATE THE 
IPL. 



Diagram 25.26 ILRTMIOl (Part 1 of 2) 
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Input 



Processing 



Output 



CODE-i=X ' 0C 



SDWA PARM 



J 03 1 IF RTM PASSED A SDWA, MOVE' 
RECOVERY DATA INTO THE 
SDWA AND PREPARE TO RETRY 




PLACE ERROR RECORDING 
INFORMATION INTO THE SDWA, 
INCLUDING A COPY OF THE EPATH TO 
THE VARIABLE RECORDING AREA, 
THEN GO PREPARE TO RETRY INTO 
ILRTMI00 OR ILRTMRLG. 



Diagram 25.26 ILRTMIOl (Part 2 of 2) 
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Input 



Processing 



Output 



I 



to 



ASMVT 



ASMRLGWQ 



| 01 | REINITIALIZE EPATH AND 

OTHER REQUIRED FIELDS FOR 
RETRY TO ILRTMRLG. 

| 02 | SET UP TO CAUSE RETRY IN 
ILRTMI01 . 

1 03 j RETURN TO RTM WHO WILL 
RETURN TO STEP 4. 



"=> 



EPATH 






EPAVSAMI=0 




EPABASP=0 


EPARASP=0 


EPAACE=0 


EPARECUR=0 


EPAVWKA=0 


ASMVT 






ASMRLGWQ=0 





REG 






ADDR.OF 
ILRCRTMX 




REG 15 






* 





02 



WITHOUT THE SDWA NO ERROR 
RECORDING OR VALIDITY CHECKING 
IS POSSIBLE. SET EPARECUR=1 SO 
THAT RECURSION CAN BE DETECTED. 
THE FOLLOWING EPATH FIELDS ARE 
SET TO ZERO UNCONDITIONALLY: 
EPAVSAMI, EPABASP, EPARASP, 
EPAACE, ASMRLGWQ, EPAVWKA. 

THE RETRY ADDRESS ILRCRTMX IN 
ILRTMI01 IS PUT IN REGISTER ZERO 
AND A 4 IS PUT IN REGISTER 15 TO 
CAUSE RTM TO RETRY. 

CONTROL IS RETURNED TO RTM WHO 
WILL CONTINUE AT STEP 4. 



Diagram 25.26.1 SETRETRY (Parti of 2) 
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Input 



Processing 



Output 



t> 



| 04 | SET UP THE REGISTERS FOR 
MAIN RETRY POINT IN 
ILRTMRLG. 

[05] BRANCH TO ILRCRTM1 IN 
ILRTMRLG. 



TO ILRTMRLG 
(ILRCRTM1) 



REG 3 






ADDR.OF 
ASMVT 




REG 9 




| EPAOWKA 
REG 10 




|lLRCBTM1 
REG 13 




| EPATMRSV 
REG 4 






ADDR.OF 
EPATH 











AT THIS POINT, IT APPEARS (TO 
THE SYSTEM) THAT ILRTMI01 IS NO 
LONGER RUNNING AS AN ESTAE BUT 
AS A MAINLINE RETRY ROUTINE. THE 
FOLLOWING REGISTERS ARE LOADED 
WITH VALUES REQUIRED TO BRANCH 
TO THE MAIN RETRY POINT IN 
ILRTMRLG: REGISTER 3, REGISTER 
4, REGISTER 9, REGISTER 10, 
REGISTER 13. 

BRANCH TO ILRTMRLG TO CONTINUE 
PROCESSING ACES OR WAIT IF NO 
MORE ACES ARE ON THE QUEUES 
(ASMRLGWQ AND ASMRLGRQ) . 



Diagram 25.26.1 SETRETRY (Part 2 of 2) 



Section 2: Method of Operation 5-303 
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Input 



Processing 



Output 





REG 1 






r 






3DWA 




SDWAPARM 




SDWACMPC 




i 


:path 








EPAMAST 




EPAVSAMI 


EPAVWKA 


EPABASP 


EPARASP 


EPAACE 


EPATMRSV 














CKRETRY: 

| 1 | IF PROCESSING A 'RECORD 
ONLY' ABEND, RECORD THE 
ERROR AND RETRY. 



| 02 | IF MASTER SCHEDULER 

INITIALIZATION IS NOT 
POSTED GO TO STEP 8. 

| 03 | FREE THE STORAGE GOTTEN BY 
ILRVSAMI . 

1 04 1 FREE THE CURRENT ACE. 



[ 05 J FREE THE STORAGE USED TO 
RETRIEVE THE ASPCT. 



RETURN TO RTM 




| 01 | SET UP FOR RETRY IF ONE OF THE 
FOLLOWING CODES IS IN SDWACMPC: 
X' 086000', X' 087000'. RETURN TO 
RTM. 



1 02 | IF MASTER SCHEDULER 

INITIALIZATION IS NOT POSTED, 
ILRTMRLG MAIN LINE ACE PROCESSOR 
WAS NOT IN CONTROL, SO GO TO 
STEP 8. 

[ 03 | IF THE ERROR OCCURRED DURING 
ILRTMRLG 'S CALL TO VSAM 
(SDWAPERC=1), ISSUE ENDREQ FOR 
VSAM CLEAN UP. IF EPAVWKA IS 
NON-ZERO, ISSUE ILRGMA TO FREE 
THE VSAMI WORKAREA. ISSUE 
FREEMAIN FOR THE ASPCT BUFFER. 

| 04 | VALIDITY CHECK THE ACE ADDRESSED 
BY EPAACE AND ISSUE ILRGMA TO 
FREE IT. 

[05] CALL ILRAFS00 TO FREE ASPCT 

STORAGE IF EPARASP IS NON-ZERO. 



ENDREG 
ILRGMA 
FREEMAIN 



ILRFRR01 
ILRGMA 



Diagram 25.26.2 CKRETRY (Part 1 of 3) 
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Input 



Processing 



Output 



RESET THE TRACKING FLAGS 
IN EPATH AND VERIFY THE 
ACE WORK QUEUE. 

RETURN TO RTM INDICATING 
RETRY AT ILRTMRLG MAIN 
RETRY POINT. 



±$ 



EPATH 






EPAVSAMI=0 




SDWASR04 






ADDR OF 
EPATH 




SDWASR03 






ADDR OF 
ASMVT 




SDWASR09 
| EPAOWKA 

SDWASR10 
| ILRCBTM1 

SDWASR13 
JEPATMRSV 







Notes 



[06| VERIFY THE ACE WORK QUEUE 

(ASMRLGWQ): SET EPAVSAMI-0 AND 
SET EPARECUR-1 TO STOP RECURSION 
DUE TO ERRORS IN ILRTMRLG. 

f07] UPDATE THE FOLLOWING REGISTER 
VALUES IN THE SDWA TO CONTAIN 
THE VALUES REQUIRED AT THE MAIN 
RETRY POINT (ILRCRTM1) IN 
ILRTMRLG: REG 3, REG 4, REG 9, 
REG 10, REG 13. 



ILRVACEQ 



Diagram 2S.26.2 CKRETRY (Part 2 of 3) 
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Input 



EPATH 






EPATMI 


* 






EPATMXIT 




EPAMSECB 




EPAMAST 








1 


VSMVT 








ASMNOTMR 


~ V 



















Processing 



Output 



1 08 | IF ILRTMIOO WAS 

PROCESSING, ATTEMPT TO 
RECOVER. 

| 09 | IF ILRTMIOO HAS PROCESSED 
GOTO STEP 11 . 

| 1 | INFORM THE OPERATOR OF THE- 
ERROR AND DETERMINE IF HE " 
WANTS TO CONTINUE. 



|l1 | POST MASTER SCHEDULER 
INITIALIZATION. 

| 1 2 | RETURN TO RTM INDICATING 
RETRY AT THE MAIN ENTRY 
POINT IN ILRTMRLG. 



RETURN TO RTM 



ASMNOTMR=1 



EPATH 

| EPAMAST~ 



1 08 1 IF EPATMI IS 1, GOTO TMIPROC. 

| 09 | IF EPATMXIT FLAG HAS BEEN TURNED 
ON BY TMIPROC, GO TO STEP 11. 

| 10 | THE FAILURE HAPPENED SOMETIME 

BEFORE ILRTMRLG CALLED ILRTMIOO 
SO ISSUE MESSAGES ILR021I AND 
ILR022A TO INFORM THE OPERATOR 
OF AN ERROR AND TO DETERMINE IF 
HE WANTS TO CONTINUE WITHOUT VIO 
JOURNALING. IF HE DOES, ASMNOTMR 
IS SET TO 1 TO INDICATE ILRTMRLG 
IS NOT AVAILABLE. SET TO ZERO 
SARDSNL.PARTDSNL, AND PARTTPAR. 

|11 | EPAMSECB IS USED TO POST MASTER 
SCHEDULER INITIALIZATION - 
SETPAMAST=1. 

|12| RETRY AT THE MAIN RETRY POINT IN 
ILRTMRLG (ILRCRTM1), WHICH WILL 
PUT THE ILRTMRLG TASK IN A WAIT. 



Diagram 25.26.2 CKRETRY (Part 3 of 3) 
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Input 



Processing 



Output 



EPATH 


FROM CKRETRY 

(ILRTMI01 

SUBROUTINE) 




EPATMWKA 


> 






EPAWARM 




EPAMSECB 




EPATMACB 




> 




EPATMIBA 




EPATMISV 








ILRTPARB 


















TPARWARM 

















[01 | IF WARMSTRT WAS NOT 

PROCESSING, GOTO STEP 5. 



02[ IF WARMERR WAS PROCESSING, 
GOTO STEP 16. 



1 03 1 SET UP TO RETRY AT WARMERR- 
IN ILRTMIOO. 



| 04 | RETURN TO RTM INDICATING 
RETRY AT WARMERR. 




RETURN TO RTM 



SDWASR03 


SDWASR07 




ADDR OF 
ASMVT 




ADDR OF 
IOBUFFER 


SDWASR04 


SDWASR1 1 




ADDR OF 
EPATH 




EPATMIBA | 






SDWASR12 


) EPATMACB | 


EPATMIBA+4 
K-1 


SDWASR06 SDWASR13 


| EPATMWKA | 


EPATMISV | 











ED 



IF EPAWARM=0, THE WARMSTRT (WARM 
START) SECTION OF ILRTMIOO WAS 
NOT EXECUTING. GO TO STEP 5 TO 
DETERMINE WHERE THE ERROR 
OCCURRED. 

A WARM START WAS PROCESSING. IF 
TPARWARM=0, THEN WARMERR (WARM 
START RETRY CODE) WAS 
PROCESSING. SO THERE IS A DOUBLE 
OR RECURSIVE ERROR. GO TO STEP 
16 TO ISSUE MESSAGES. 



| 03 | SINCE THIS IS A SINGLE WARM 

START ERROR, PREPARE TO RETRY. 
THE FOLLOWING REGISTERS ARE 
REQUIRED BY WARMERR: 
3,4,5,6,' ,11,12 AND 13. 

1 04 1 RETURN TO RTM TO RETRY AT 

WARMERR (ILRCRTM2) IN ILRTMIOO. 



Diagram 25.26.3 TMIPROC (Parti of 4) 
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Input 



Processing 



1 05 J IF CVIOSTRT WAS NOT 

PROCESSING, GOTO STEP 10. 

| 06 | WRITE MESSAGES TO 

DETERMINE IF THE OPERATOR 
WANTS TO CONTINUE. 

I 07 I RESET TRACKING FLAGS. 



| 08} CLOSE SYS1.STGINDEX. 

| 09 | RETURN TO RTM INDICATING 
RETRY AFTER CVIOSTRT . 



Output 



7=$ 



RETURN TO RTM 



SDWASR03 


SDWASR04 




ADDR OF 
ASMVT 




ADDR OF 
EPATH 


SDWASR05 
| EPATMACB 

SDWASR12 


SDWASR1 1 

|epatmiba I 

SDWASR13 




EPATMIBA+4 
K-1 




epatmisv J 













| 05 | IF EPACOLD=0 GOTO STEP 10. 

|06| WRITE MESSAGES ILR001I AND 

ILR022A TO INDICATE AN ERROR 
OCCURRED AND SEE IF THE OPERATOR 
WANTS TO CONTINUE. 

|07J CONTINUING, SET EPACOLD=0 

(CVIOSTRT NO LONGER PROCESSING) 
AND ASMNOTMR-1 (ILRTMRLG WILL 
NOT BE USED TO RELEASE SAVED LG 
THIS IPL) . 

| 08 | IF ASMSTGXA IS NOT ZERO ISSUE 

CLOSE FOR SYS1 .STGINDEX AND SET 
ASMSTGXA-0. 



SET UP SDWA WITH VALUES FOR 
REGISTERS REQUIRED AFTER 
CVIOSTRT (ILRCRTM3) AND RETURN 
TO RTM TO RETRY. 



Ref 



Diagram 25.26.3 TMIPROC (Part 2 of 4) 
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| 10 | IF BUILDSNL WAS NOT 

PROCESSING GOTO STEP 16. 

| 11 | INFORM THE OPERATOR THAT 
PAGEADD WILL NOT WORK. 

|12| ZERO POINTERS TO THE DATA 
SET NAME LIST IN THE PART 
AND SART. 



HD 



FREE THE STORAGE FOR LIST. 



14 RESET THE TRACKING FLAG . 



| 15 | RETURN TO RTM INDICATING 
RETRY AFTER BUILDSNL. 



L 



RETURN TO RTM 



PART 










PARTDSNL=0 




SART 










SARDSNL=0 











SDWASR03 






ADDR OF 
ASMVT 




SDWASR04 






ADDR OF 
EPATH 




SDWASR05 
| EPATMACB 

SDWASR1 1 
| EPATMIBA 

SDWASR12 






EPATMIBA+4 
K-1 




SDWASR13 
| EPAIMISV 





| 10 | IF EPABUILD=0, GOTO STEP 16. 

|11 | WRITE MESSAGE ILR003I TO INFORM 
THE OPERATOR THAT PAGEADD WILL 
NOT WORK. 



|12| SET THE DATA SET NAME LISTS 

(PARTDSNL AND SARDSNL) TO ZERO. 

| 1 3 | ISSUE FREEMAIN FOR LIST 
ADDRESSED BY EPADSLST. 



|14| SET EPABUILD=0. 



|15| SET UP SDWA WITH REQUIRED 

REGISTER VALUES AND RETURN TO 
RTM TO RETRY AFTER BUILDSNL 
(ILRCRTM4 IN ILRTMI00) . 
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VS2.G3.807 



Input 



Processing 



[16] ASK THE OPERATOR IF HE 

WANTS TO CONTINUE INSPITE 
OF UNKNOWN ERROR. 



Output 



S 



FREE STORAGE. 



18 SET TRACKING FLAGS. 



|19| SET UP TO RETRY AT 
ILRCRTM5 . 

[20] RETURN TO RTM INDICATING 
RETRY IN ILRTMRLG AFTER 
CALL TO ILRTMIOO. 



r 



RETURN TO RTM 





SDWASR03 






ADDR OF 
ASMVT 




SDWASR04 






ADDR OF 
EPATH 




SDWASR06 

|epamsecb 

SDWASR09 
| EPAOWKA 

SDWASR10 
| ILRCBTMl 

SDWASR13 
| EPATMRSV 







|16| AT THIS POINT THE PLACE OF 
FAILURE IS UNKNOWN UNLESS 
WARMERR FAILED. ISSUE MESSAGES 
ILR021I AND ILR022A TO SEE IF 
THE OPERATOR WANTS TO CONTINUE. 

|17[ CONTINUING, SET ASMNOTMR=1 

(INDICATING ILRTMRLG WILL NOT BE 
USED TO RELEASE LG ON SAVED 
LOGICAL GROUPS) . IF ASMSTGXA IS 
ZERO, FREE THE STORAGE USED FOR 
THE ACB(EPATMACB) . FREE THE WORK 
AREA FOR ILRTMIOO (EPATMWKA) . 
FREE THE STORAGE FOR TPARTBLE 
(EPATPART) . ZERO PARTTPAR. 

|18| SET EPATMXIT-1. 

|19| ILRTMRLG AT ILRCRTM5 REQUIRES 

REGISTERS 3, 4, 6, 9, 10 AND 13. 

| 20 | RETURN TO RTM TO RETRY AT 
ILRCRTM5 . 
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Processing 



Output 





FROM ASM 
RECOVERY 
ROUTINE 

r 1 ^ 




3DWA 


i / 










1 




> 








iSMVT 




|reg 3 |-| ; 










ASMSTAGQ 


















JORK AREA 




|reg 8 |-| V 




' 


1 
















y 


' 






1 
















JORK AREA | 




















QTYPE 





















ILRVASGQ: 

|01 [ INITIALIZE QUEUE VERIFIER 
PARAMETER LIST WITH 
PARAMETERS UNIQUE TO THE 
VERIFICATION OF THE 
ASMSTAGQ. 



|Q2| CALL COMMON ROUTINE TO 

INTERFACE WITH THE QUEUE 
VERIFIER. 



TU 



u 



TO CALLER 



WORK AREA 








QVPLEVR 




QVPLHDR 




QVPLFPTR 




QVPLTRLR 









; 




| REG 3 




I ' 




ASMSTAGQ 








| REG 15 


U^ 


RETURN 
CODE 







INITIALIZE THE PARAMETERS OF THE 
QUEUE VERIFIER PARAMETER LIST 
THAT ARE UNIQUE FOR THE 
VERIFICATION OF THE ASMSTAGQ. 
THESE PARAMETERS ARE THE ADDRESS 
OF THE QUEUE HEADER (ASMSTAGF) , 
THE ADDRESS OF THE QUEUE TRAILER 

(ASMSTAGL) , THE ADDRESS OF THE 
ELEMENT VERIFICATION ROUTINE 

(ILRVAIA), AND THE OFFSET OF THE 
FORWARD CHAIN POINTER 

(AIANXAIA) . 

CALL COMMON ROUTINE TO SET UP 
THE INTERFACE FOR THE QUEUE 
VERIFIER. AN INTERNAL VARIABLE, 
QTYPE, IS SET TO INDICATE THE 
QUEUE IS A SINGLE-THREADED, 
DOUBLE-HEADED QUEUE (QTYPE=2 ) . 



COMQRTN 



Diagram 25.27.1 ILRVASGQ (Part 1 of 1) 
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input 



Processing 



Output 



|reg 





I'- 


LGE 








LGEPROCQ 












|reg 


i 


ll 


SDWA 








* 


1 






|reg 


8 


h 


WORK AREA 








^ 


I 






|reg 


13 


h 


SAVE AREA 








" 





FROM ASM 
RECOVERY 
ROUTINE 



fc> 



WORK AREA 








QTYPE 







ILRVLPRQ: 

| 1 | VERIFY THAT REGISTER 

POINTS TO A VALID LGE. IF 
NOT, NO FURTHER 
VERIFICATION CAN BE DONE. 



1 02 J INITIALIZE THE QUEUE 

VERIFIER PARAMETER LIST 
WITH PARAMETERS UNIQUE TO 
THE VERIFICATION OF THE 
LGEPROCQ. 



TO CALLER 



| 03 | CALL THE COMMON ROUTINE TO- 
INTERFACE WITH THE QUEUE 
VERIFIER. 



L 



% 



TO CALLER 





|REG 15 |J 


RETURN 
CODE 







|REG 8 | r 



WORK AREA 








QVPLEVR 




QVPLHDR 




QVPLFPTR 




QVPLTRLR 




QVPLBPTR 









¥ 


„„ 


| REG 


— 1 Iwn 


1 1 > 




LGEPROCQ 








|REG 15 


IK* 


RETURN 
CODE 







|01| VERIFY THAT REGISTER POINTS TO 
A VALID LGE. IF IT DOES NOT, 
RETURN TO THE CALLER SINCE NO 
FURTHER VERIFICATION CAN BE 
DONE. 

[pi] INITIALIZE THE PARAMETERS OF THE 
QUEUE VERIFIER PARAMETER LIST 
THAT ARE UNIQUE FOR THE 
VERIFICATION OF THE LGEPROCQ. 
THESE PARAMETERS ARE THE ADDRESS 
OF THE QUEUE HEADER (LGEPROCF) , 
THE ADDRESS OF THE QUEUE TRAILER 
(LGEPROCL) , / THE ADDRESS OF THE 
ELEMENT VERIFICATION ROUTINE 
(ILRVAIAC), THE OFFSET OF THE 
FORWARD CHAIN POINTER (AIAFQPA) , 
AND THE OFFSET OF THE BACKWARD 
CHAIN POINTER (AIABQPA) . 

[03] CALL THE COMMON ROUTINE TO SET 
UP THE INTERFACE FOR THE QUEUE 
VERIFIER. SET QTYPE- 3 TO 
INDICATE THE QUEUE IS A 
DOUBLE-HEADED, DOUBLE-THREADED 
QUEUE. 



COMQRTN 



25.27. 
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Diagram 25.27.2 ILRVLPRQ (Part 1 of 1) 
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Processing 



Output 





FROM ASM 
RECOVERY 
ROUTINE 




3DWA 


i y 










1 




y 








\SMVT 




|reg 3 |-| ; 










asmsart 










3ART 




|asmsart |i i 










SARWAITQ 






> 






JORK AREA 




|reg 8 |i V 




* 


1 






3AVE AREA 




|REG 13 |i i 




* 


1 
















JORK AREA | 




















QTYPE 





















ILRVSWTQ: 

| 01 | INITIALIZE QUEUE VERIFIER 
PARAMETER LIST WITH 
PARAMETERS UNIQUE TO THE 
VERIFICATION OF THE 
SARWAITQ . 



CALL COMMON ROUTINE TO 
INTERFACE WITH THE QUEUE 
VERIFIER. 



1 03 1 SET AIAPTR TO THE ADDRESS 
OF THE FIRST AIA ON THE 
SARWAITQ. THEN BRANCH TO 
SECTION OF ILRVSPAQ THAT 
VERIFIES THE AIA'S IN A 
SWAP GROUP. 



t 



u 



■*7=> 



TO VERLAIAS 
(IN ILRVSPAQ) 



REG 8 



WORK AREA 








QVPLEVR 




QVPLHDR 




QVPLFPTR 




QVPLTRLR 









( 




| ASMSART 


— "J ^ &/U\ i. 


1 • * 




SARWAITQ 








|REG 15 


H 1 "* 


RETURN 
CODE 







ir*[ 



INITIALIZE THE PARAMETERS OF THE 
QUEUE VERIFIER PARAMETER LIST 
THAT ARE UNIQUE FOR VERIFICATION 
OF THE SARWAITQ. THESE 
PARAMETERS ARE THE ADDRESS OF 
THE QUEUE HEADER (SARWAITF) , THE 
ADDRESS OF THE QUEUE TRAILER 

(SARWAITL) , THE ADDRESS OF THE 
ELEMENT VERIFICATION ROUTINE 

(ILRVAIA), AND THE OFFSET OF THE 
FORWARD CHAIN POINTER 

(AIANXAIA) . 

CALL COMMON ROUTINE TO SET UP 
THE INTERFACE FOR THE QUEUE 
VERIFIER. SET QTYPE-2 TO 
INDICATE THE QUEUE IS A 
SINGLE-THREADED, DOUBLE-HEADED 
QUEUE. 

THE VARIABLE AIAPTR IS 
INITIALIZED TO THE ADDRESS OF 
THE FIRST AIA ON THE SARWAITQ. 
THIS IS DONE TO SET UP FOR THE 
VERIFICATION OF THE LATERAL 
AIA'S OF EACH AIA ON THE 
SARWAIXQ. THIS VERIFICATION IS 
ACTUALLY DONE. IN ILRVSPAQ. 



COMQRTN 



ILRVSPAQ 



25.27. 
6 



Label 



Ref 



Diagram 25.27.3 ILRVSWTQ (Part 1 of 1) 



Section 1: Method of Operation 5-313 
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Input 



Processing 





FROM ASM 
RECOVERY 
ROUTINE 




i / 










I 


1 




> 


UA 






1 












|reg 1 |t 


SDWA 




. - i I 








1 














|REG 8 |-j 


WORK AREA 




' 


1 














SAVE AREA 




y 


|REG 13 |-| 




' 


1 
















WORK AREA | 


















QTYPE 



















Output 



ILRVAIAQ: 

1 01 | INITIALIZE QUEUE VERIFIER 
PARAMETER LIST WITH 
PARAMETERS UNIQUE TO THE 
VERIFICATION OF AN AIA 
QUEUE . 



I 02 | CALL COMMON ROUTINE TO 

INTERFACE WITH THE QUEUE 
VERIFIER. 



1U 



TO CALLER 



WORK AREA 








QVPLEVR 




QVPLHDR 




QVPLFPTR 











|REG 15 |J 


RETURN 
CODE 















INITIALIZE THE PARAMETERS OF THE 
QUEUE VERIFIER PARAMETER LIST 
THAT ARE UNIQUE FOR VERIFICATION 
OF AN AIA QUEUE. THESE 
PARAMETERS ARE THE ADDRESS OF 
THE QUEUE HEADER (VALUE OF 
REGISTER 0) , THE ADDRESS OF THE 
ELEMENT VERIFICATION ROUTINE 

(ILRVAIA), AND THE OFFSET OF THE 
FORWARD CHAIN POINTER 

(AIANXAIA) . 

CALL COMMON ROUTINE TO SET UP 
THE INTERFACE FOR THE QUEUE 
VERIFIER. SET QTYPE=1 TO 
INDICATE THE QUEUE IS A 
SINGLE-THREADED, SINGLE HEADED 
QUEUE. 



COMQRTN 
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Input 



Processing 



Output 



J7 



REG 1 [ ■ [ S 



REG 8 h WORK AREA 



REG 13 |i SAVE AREA 



FROM ASM 
RECOVERY 
ROUTINE 



fc> 



WORK AREA 



QTYPE 



ILRVSCWQ: 

|0l| INITIALIZE QUEUE VERIFIER 
PARAMETER LIST WITH 
PARAMETERS UNIQUE TO THE 
VERIFICATION OF AN SCCW 
QUEUE . 



[ 02 I CALL COMMON ROUTINE TO 

INTERFACE WITH THE QUEUE 
VERIFIER. 



1U 



TO CALLER 



WORK AREA 








QVPLEVR 




QVPLHDR 




QVPLFPTR 







fc 




|REG 15 |J 


RETURN 
CODE 











INITIALIZE THE PARAMETERS OF THE 
QUEUE VERIFIER PARAMETER LIST 
THAT ARE UNIQUE FOR VERIFICATION 
OF AN SCCW QUEUE. THESE 
PARAMETERS ARE THE ADDRESS OF 
THE QUEUE HEADER (VALUE OF 
REGISTER 0) , THE ADDRESS OF THE 
ELEMENT VERIFICATION ROUTINE 

(ILRVSCCW), AND THE OFFSET OF 
THE FORWARD CHAIN POINTER 

(SCCWSCCW) . 

CALL COMMON ROUTINE TO SET UP 
THE INTERFACE FOR THE QUEUE 
VERIFIER. SET QTYPE=1 TO 
INDICATE THE QUEUE IS A 
SINGLE-THREADED, SINGLE-HEADED 
QUEUE. 



COMQRTN 
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VS2 .03.807 



Input 



Processing 



REG ~l "*r [ 



luZ 



REG 8 h WORK AREA 



"U 



REG 13 [ - ) SAVE AREA 



Output 



FROM ASM 
RECOVERY 
ROUTINE 



t> 



REG 8 | (-+• 



WORK AREA 



QTYPE 



C^> 



ILRVSPAQ: 

| 01 | INITIALIZE THE QUEUE 

VERIFIER PARAMETER LIST 
WITH PARAMETERS UNIQUE TO 
THE VERIFICATION OF A 
QUEUE OF SWAP AIA'S. 



| 02 | CALL THE COMMON ROUTINE TO- 
INTERFACE WITH THE QUEUE 
VERIFIER. 



1U 



■T=* 



1 03 j SET AIAPTR TO THE ADDRESS 
OF THE FIRST AIA TO 
PREPARE FOR VERIFICATION 
OF THE AIA'S IN EACH SWAP 
GROUP. 



| 04 | ALTER THE QUEUE VERIFIER 
PARAMETER LIST FOR THE 
VERIFICATION OF EACH SWAP 
GROUP. 



|REG 8 J i- 



WORK AREA 



QVPLEVR 



QVPLHDR 



QVPLFPTR 



fc 


|REG 15 


H 


RETURN 
CODE 









■] FIRST AIA 


| AIA PTR 


J-', | 





|REG 8 | i-* 



WORK AREA 



QVPLFPTR 



1 01 1 INITIALIZE THE PARAMETER OF THE 
QUEUE VERIFIER PARAMETER LIST 
THAT ARE UNIQUE FOR THE 
VERIFICATION OF A QUEUE OF. SWAP 
AIA'S. THESE PARAMETERS ARE THE 
ADDRESS OF THE QUEUE HEADER 
(VALUE OF REGISTER 0) , THE 
ADDRESS OF THE ELEMENT 
VERIFICATION ROUTINE (ILRVAIA) , 
AND THE OFFSET OF THE FORWARD 
CHAIN POINTER (AIANXAIA) . 

| 02 | CALL THE COMMON ROUTINE TO SET 
UP THE INTERFACE FOR THE QUEUE 
VERIFIER. SET QTYPE=1 TO 
INDICATE THE QUEUE IS A 
SINGLE-THREADED, SINGLE-HEADED 
QUEUE. 

1 03 1 THE VARIABLE AIAPTR IS 

INITIALIZED TO THE ADDRESS OF 
THE FIRST AIA ON THE INPUT 
CHAIN. THIS IS DONE TO SET UP 
FOR THE VERIFICATION OF THE 
LATERAL AIA'S OF EACH AIA ON THE 
INPUT CHAIN. 

| 04) CHANGE THE OFFSET OF THE FORWARD 



COMQRTN 



25.27. 
20 



CHAIN POINTER (TO AIAFQPA) TO 
VERIFY THE LATERAL AIA'S. 



Diagram 25.27.6 ILRVSPAQ (Part 1 of 2) 
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Input 



Processing 



| REG 8 | r 



WORK AREA 



QTYPE 



Output 



LOOP THROUGH THE AIA'S ON - 
THE INPUT CHAIN, CALLING 
THE COMMON QUEUE VERIFIER 
INTERFACE ROUTINE FOR EACH 
SWAP GROUP. 



5=3 



TO CALLER 







JREG 15 


H 


RETURN 
CODE 











FOR EACH AIA ON THE INPUT CHAIN, 
CALL THE COMMON ROUTINE TO 
INTERFACE WITH THE QUEUE 
VERIFIER. QTYPE=1 TO INDICATE 
THE QUEUE IS A 

SINGLE-THREADED, SINGLE-HEADED 
QUEUE. AFTER ALL THE SWAP GROUPS 
HAVE BEEN VALIDITY CHECKED, 
RETURN TO THE CALLER. THE RETURN 
CODE IS SET TO THE LARGEST 
RETURN CODE PASSED BACK BY THE 
QUEUE VERIFIER. 



COMQRTN 
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Input 



Processing 



Output 



REG "l ^r f 



REG 1 |i £ 



REG 8 |i WORK AREA 



REG 13 It SAVE AREA 



FROM ASM 
RECOVERY 
ROUTINE 



t> 



REG 8 t-+ 



WORK AREA 



QTYPE 



ILRVIOEQ: 

| 01 | INITIALIZE QUEUE VERIFIER 
PARAMETER LIST WITH 
PARAMETERS UNIQUE TO THE 
VERIFICATION OF AN IOE 
QUEUE. 



1 02 1 CALL COMMON ROUTINE TO 

INTERFACE WITH THE QUEUE 
VERIFIER. 



1!=> 



TO CALLER 



| REG 8 



WORK AREA 








QVPLEVR 




QVPLHDR 




QVPLFPTR 







fc 


|REG 15 | J 


RETURN 
CODE 







INITIALIZE THE PARAMETERS OF THE 
QUEUE VERIFIER PARAMETER LIST 
THAT ARE UNIQUE FOR VERIFICATION 
OF AN IOE QUEUE. THESE 
PARAMETERS ARE THE ADDRESS OF 
THE QUEUE HEADER (VALUE OF 
REGISTER 0) , THE ADDRESS OF THE 
ELEMENT VERIFICATION ROUTINE 
(ILRVIOE) , AND THE OFFSET OF THE 
FORWARD CHAIN POINTER (IOENEXT) . 

CALL COMMON ROUTINE TO SET UP 
THE INTERFACE FOR THE QUEUE 
VERIFIER. SET QTYPE=1 TO 
INDICATE THE QUEUE IS A 
SINGLE-THREADED, SINGLE-HEADED 
QUEUE. 



COMQRTN 



Diagram 25.27.7 ILRVIOEQ (Part 1 of 1) 
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Input 



Processing 



Output 



| REG I i 



FROM ASM 
RECOVERY 
ROUTINE 






|reg 1 


h SDWA 




'I I 





IF THE STORAGE POINTED TO 
BY REGISTER CANNOT BE 
REFERENCED, RETURN TO 
CALLER . 



CD 



ADDRESS VERIFIER 



DIFFERENTIATE BETWEEN AIA 
AND ACE BY OP CODE, AND 
ROUTE CONTROL TO THE 
APPROPRIATE ROUTINE FOR 
FURTHER VERIFICATIONS. 

A. AIA VERIFICATION 
ROUTINE. 

B. ACE VERIFICATION 
ROUTINE. 



TO CALLER 



IF THE STORAGE POINTED TO BY 
REGISTER ZERO CANNOT BE 
REFERENCED, RETURN IS MADE TO 
THE CALLER WITH A RETURN CODE OF 
8, MEANING THAT THE ELEMENT IS 
NEITHER AN AIA NOR ACE. 

IF THE STORAGE CAN BE 
REFERENCED, AN AIA IS 
DISTINGUISHED FROM AN ACE BY THE 
OPERATION CODE. SEPARATE 
ROUTINES PERFORM FURTHER 
VERIFICATIONS FOR AN AIA AND AN 
ACE. 

A. AIA VERIFICATION ROUTINE. 

B. ACE VERIFICATION ROUTINE. 



Diagram 25.27.8 ILRVAIAC (Part 1 of 1) 
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Input 



Processing 



Output 



» T » 


|reg 




_!■', , 




|REG 1 


|i sdwa 




'I I 





ENTRY ILRVAIA 

RECOVERY 

ROUTINE 



u 





| REG 




_!■', | 




| REG 1 


~~ It >sdwa 




'I 1 








1 1 I IF INPUT ADDRESS IS NOT 0, 
CALCULATE PCB ADDRESS. 

| 02 | ILRVPCB: SECONDARY ENTRY 
POINT. 

| 03 ] IF INPUT ADDRESS IS NOT 0, 
DETERMINE IF PCB/AIA CAN 
BE REFERENCED. 



CO 



ADDRESS VERIFIER 



IF THE STORAGE CAN BE 
REFERENCED, VERIFY THAT 
THE STORAGE POINTED TO BY 
PCBASCB CAN BE REFERENCED 
AND CONTAINS THE ASCB 
IDENTIFIER. 



cr> 



ADDRESS VERIFIER 



Notes 



|01[ FOR ENTRY ILRVAIA, IF INPUT 

ADDRESS IS 0, A RETURN CODE OF 8 
IS SET. OTHERWISE, THE OFFSET TO 
THE PCB IS CALCULATED. 



| 02 | THIS IS THE ENTRY POINT FOR 
ILRVPCB. 

|03| IF INPUT ADDRESS IS 0, A RETURN 
CODE OF 8 IS SET. OTHERWISE, 
VERIFY THAT THE STORAGE POINTED 
TO BY THE PCB ADDRESS CAN BE 
REFERENCED. IF IT CANNOT, A 
RETURN CODE OF 8 IS SET. 

[ 04 | IF THE PCB/AIA CAN BE 

REFERENCED, VERIFY THAT THE 
STORAGE POINTED TO BY PCBASCB 
CAN ALSO BE REFERENCED. IF IT 
CANNOT, A RETURN CODE OF 8 IS 
SET. IF IT CAN BE REFERENCED, 
THE ASCBASCB FIELD IS CHECKED 
FOR THE ACRONYM 'ASCB'. IF THE 
ACRONYM IS NOT THERE, A RETURN 
CODE OF 8 IS SET. 



Routine Label 



Diagram 25.27.9 ILRVAIA/ILRVPCB (Part 1 of 2) 
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Input 
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Output 



| 05 ) IF STORAGE IS A PCB/AIA, 
VERIFY THAT IT DOES NOT 
CONTAIN BAD DATA. 

| 06 | RETURN TO CALLER WITH 
RETURN CODE INDICATING 
SUCCESS OR FAILURE. 




IF THE PREVIOUS VERIFICATIONS 
ARE SUCCESSFUL, PERFORM 
VERIFICATIONS TO CHECK FOR BAD 
DATA (AIAOP=X'00') . IF THIS 
VERIFICATION FAILS, A RETURN 
CODE OF A IS SET. 

RETURN IS MADE TO THE CALLER 
WHEN AN ERROR IS FOUND OR 
VALIDITY CHECKING IS COMPLETE. 
THE POSSIBLE RETURN CODES ARE: 

A. - ELEMENT PASSED ALL TESTS. 

B. 4 - ELEMENT IS A PCB/AIA, BUT 
IT CONTAINS BAD DATA. 

C. 8 - ELEMENT IS NOT A PCB/AIA. 



Diagram 25.27.9 ILRVAIA/ILRVPCB (Part 2 of 2) 
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Processing 



Ovtput 




|reg 1 


h SDWA 
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IF INPUT ADDRESS IS NOT 0, 
DETERMINE IF ENTIRE ACE 
CAN BE REFERENCED . 



ay 



ADDRESS VERIFIER 



[ 02 | IF STORAGE CAN BE 

REFERENCED, VERIFY THAT 
ACELGE POINTS TO A VALID 
LGE. 

| 03 ) IF ACELGE POINTS TO A 
VALID LGE, VERIFY THAT 
ACELGID EQUALS LGELGID. 

| 04 | RETURN TO CALLER WITH 
RETURN CODE INDICATING 
SUCCESS OR FAILURE. 



TO CALLER 







| REG 15 [J 


RETURN 
CODE 









\E 



IF INPUT ADDRESS IS 0, A RETURN 
CODE OF 8 (NOT AN ACE) IS SET. 
OTHERWISE, VERIFY THAT THE 
STORAGE POINTED TO BY THE ACE 
ADDRESS CAN BE REFERENCED. IF IT 
CANNOT, A RETURN CODE OF 8 IS 
SET. 

IF THE STORAGE CAN BE 
REFERENCED, VERIFY THAT ACELGE 
POINTS TO A VALID LGE. IF IT 
DOES NOT POINT TO A VALID LGE, A 
RETURN CODE OF 8 IS SET. 

IF THE PREVIOUS VERIFICATIONS 
ARE SUCCESSFUL, CHECK FOR BAD 
DATA BY VERIFYING THAT ACELGID 
EQUALS LGELGID. IF IT DOES NOT,, 
A RETURN CODE OF 4 IS SET. 

RETURN IS MADE TO THE CALLER 
'WHEN AN ERROR IS FOUND OR 
VALIDITY CHECKING IS COMPLETE. 
THE POSSIBLE RETURN CODES ARE: 

A. - ELEMENT PASSED ALL TESTS. 

B. 4 - ELEMENT IS AN ACE BUT 



CONTAINS BAD DATA. 
C. 8 - ELEMENT IS NOT AN ACE. 



Diagram 25.27.10 ILRVACE (Part 1 of 1) 
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Output 





|reg o 
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|reg i 


|-| SDWA 
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=5 



IF INPUT ADDRESS IS NOT 0, 
DETERMINE IF THE ENTIRE 
LGE CAN BE REFERENCED. 



CO 



ADDRESS VERIFIER 



IF STORAGE .CAN BE 
REFERENCED, VERIFY THAT 
STORAGE POINTED TO BY 
LGEASPCT CAN BE REFERENCED 
AND CONTAINS THE ASPCT 
IDENTIFIER. 



<^> 



ADDRESS VERIFIER 



IF STORAGE IS AN LGE, 
VERIFY THAT THE LGE DOES 
NOT CONTAIN ANY BAD DATA. 

RETURN TO CALLER WITH 
RETURN CODE INDICATING 
SUCCESS OR FAILURE. 



TO CALLER 





JREG 15 |J 


RETURN 
CODE 







Notes 



| 01 | IF INPUT ADDRESS IS 0, A RETURN 
CODE OF 8 (NOT AN LGE) IS SET. 
OTHERWISE, VERIFY THAT THE 
STORAGE POINTED TO BY THE LGE 
ADDRESS CAN BE REFERENCED. IF IT 
CANNOT, A RETURN CODE OF 8 IS 
SET. 

| 02 | IF THE LGE CAN BE REFERENCED, 

VERIFY THAT THE STORAGE POINTED 
TO BY LGEASPCT CAN ALSO BE 
REFERENCED. IF THIS STORAGE 
CANNOT BE REFERENCED, A RETURN 
CODE OF 8 IS SET. IF IT CAN, THE 
ASPIDENT FIELD IS CHECKED FOR 
THE ACRONYM 'AS PC. IF THE 
ACRONYM IS NOT THERE, A RETURN 
CODE OF 8 IS SET. 



| 03 [ IF THE PREVIOUS VERIFICATIONS 

ARE SUCCESSFUL, CHECK FOR AN LGE 
CONTAINING BAD DATA BY VERIFYING 
THAT LGELGID EQUALS ASPLGID. IF 
IT DOES NOT, A RETURN CODE OF 4 
(BAD DATA) IS SET. 

| 04 | RETURN IS MADE TO THE CALLER 
WHEN AN ERROR IS FOUND, OR 



VALIDITY CHECKING IS COMPLETE. 
THE POSSIBLE RETURN CODES ARE: 



A. - ELEMENT PASSED ALL TESTS. 



B. 4 - ELEMENT IS AN LGE BUT 
CONTAINS BAD DATA. 



C. 8 - ELEMENT IS NOT AN LGE. 



Diagram 25.27.11 ILRVLGE (Part 1 of 1) 
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Input 




Processing 



|reg i 


|l SDWA 




'I 1 





Output 



ILRVSCCW: 

1 01 I IF THE INPUT ADDRESS IS 
NOT 0, DETERMINE IF THE 
ENTIRE SCCW CAN BE 
REFERENCED. 



<^> 



ADDRESS VERIFIER 



IF THE SCCW CAN BE 
REFERENCED, VERIFY THAT 
THE STORAGE IS IN THE 
NUCLEUS, AND THAT IT 
CONTAINS THE SCCW 
IDENTIFIER. 

IF THE STORAGE IS AN SCCW, 
VERIFY THAT THE SCCW DOES 
NOT CONTAIN ANY BAD DATA. 

RETURN TO CALLER WITH A 
RETURN CODE INDICATING 
SUCCESS OR FAILURE. 



■J7=> 



TO CALLER 







|REG 15 |J 


RETURN 
CODE 









Notes 


Routine 


Label 


Ref 


Notes 


Routine 


Label 


Ref 


1 01 | IF THE INPUT ADDRESS IS 0, A 

RETURN CODE OF 8 (NOT AN SCCW) 


IEAVEADV 


IEAVEADV 




SCCWSSEC IS THE SET SECTOR 
COMMAND CODE (X'23'). 








IS SET. OTHERWISE, VERIFY THAT 
THE STORAGE POINTED TO BY THE 
SCCW ADDRESS CAN BE REFERENCED. 
IF IT CANNOT, A RETURN CODE OF 8 








C. CHECK THAT THE DATA ADDRESS 
OF SCCWSSEC IS THE ADDRESS OF 
SCCWSECT. 








IS SET. 








|04| RETURN IS MADE TO THE CALLER 








1 02 j IF THE STORAGE CAN BE 

REFERENCED, VERIFY THAT THE 
STORAGE IS IN THE NUCLEUS (< 








WHEN AN ERROR IS FOUND OR 
VALIDITY CHECKING IS COMPLETE. 
THE POSSIBLE RETURN CODES ARE: 








CVTNUCBK IF IT IS NOT, A RETURN 
CODE OF 8 IS SET. ALSO VERIFY 








A. - ELEMENT PASSED ALL TESTS. 








THAT THE SCCWID FIELD CONTAINS 
THE SCCW IDENTIFIER, X' 87' . IF 
IT IS NOT THERE, A RETURN CODE 








B. 4 - ELEMENT IS AN SCCW BUT 
CONTAINS BAD DATA. 








OF 8 IS SET. 








C. 8 - ELEMENT IS NOT AN SCCW. 








|03| IF THE PREVIOUS VERIFICATIONS 
















ARE SUCCESSFUL, MAKE THE 
















FOLLOWING TESTS TO CHECK FOR BAD 
















DATA. IF ANY OF THESE TESTS 
















FAIL, A RETURN CODE OF 4 IS SET. 
















A. CHECK THAT THE FIRST BYTE OF 
















SCCWSEEK IS THE SEEK COMMAND 
















CODE (X'OB'). 
















B. CHECK THAT THE FIRST BYTE OF 

















Diagram 25.27.12 ILRVSCCW (Part 1 of 1) 



5 - 324 OS/VS2 System Logic Library Volume 5 (VS2.03.807) 



VS2.03.807 



Input 



Processing 



Output 



| REG \ *f\ 



| REG 1 |t SDWA 



| REG 8 | i WORK AREA 



REG 13 i SAVE AREA 



T-* 



FROM ASM 
RECOVERY 
ROUTINE 



fe 



REG 8 r-+ 



WORK AREA 



QTYPE 



ILRVPCWQ: 

[ 01 | INITIALIZE QUEUE VERIFIER 
PARAMETER LIST WITH 
PARAMETERS UNIQUE TO THE 
VERIFICATION OF A PCCW 
QUEUE. 



J 02 1 CALL COMMON ROUTINE TO 

INTERFACE WITH THE QUEUE 
VERIFIER. 



iz£ 



5=> 



TO CALLER 



| REG 8 ^| i-> 



WORK AREA 



QVPLEVR 



QVPLHDR 



QVPLFPTR 



^ 




|REG 15 


l J 


RETURN 
CODE 











ED 



INITIALIZE THE PARAMETERS OF THE 
QUEUE VERIFIER PARAMETER LIST 
THAT ARE UNIQUE TO THE 
VERIFICATION OF A PCCW QUEUE. 
THESE PARAMETERS ARE THE ADDRESS 
OF THE QUEUE HEADER (VALUE OF 
REGISTER 0) , THE ADDRESS OF THE 
ELEMENT VERIFICATION ROUTINE 
(ILRVPCCW), AND THE OFFSET OF 
THE FORWARD CHAIN POINTER 
(PCCWPCCW) . 

CALL COMMON ROUTINE TO SET UP 
THE INTERFACE FOR THE QUEUE 
VERIFIER. SET QTYPE=1 TO' 
INDICATE THE QUEUE IS A 
SINGLE-HEADED, SINGLE-THREADED 
QUEUE . 



Routine Label 



COMQRTN 



25.27. 
20 



Diagram 25.27.13 ILRVPCWQ (Part 1 of 1) 
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Input 



Processing 



Output 



JREG I r 



FROM ASM 
RECOVERY 
ROUTINE 



M 



l REG 1 I t J 



HD 



IF THE INPUT ADDRESS IS 
NOT 0, DETERMINE IF THE 
ENTIRE PCCW CAN BE 
REFERENCED. 



CO 



ADDRESS VERIFIER 



IF THE PCCW CAN BE 
REFERENCED, VERIFY THAT 
THE STORAGE IS IN THE 
NUCLEUS AND THAT IT 
CONTAINS THE PCCW 
IDENTIFIER. 

VERIFY THAT THE PCCW DOES 
NOT CONTAIN BAD DATA. 

RETURN TO CALLER WITH A 
RETURN CODE INDICATING 
SUCCESS OR FAILURE. 




Notes 



[ 01 | IF THE INPUT ADDRESS IS 0, A 

RETURN CODE OF 8 (NOT A PCCW) IS 
SET. OTHERWISE, VERIFY THAT THE 
STORAGE POINTED TO BY THE PCCW 
ADDRESS CAN BE REFERENCED. If IT 
CANNOT, A RETURN CODE OF 8 IS 
SET. 



IF THE STORAGE CAN BE 
REFERENCED, VERIFY THAT THE 
STORAGE IS IN THE NUCLEUS (< 
CVTNUCB) . IF IT IS NOT, A RETURN 
CODE OF 8 IS SET. ALSO CHECK 
THAT THE PCCWID FIELD CONTAINS 
THE IDENTIFIER X'86'. IF IT DOES 
NOT, A RETURN CODE OF 8 IS SET. 

MAKE THE FOLLOWING TESTS TO 
CHECK FOR BAD DATA. IF ANY OF 
THESE TESTS FAILS, A RETURN CODE 
OF 4 IS SET. 

A. CHECK THAT THE FIRST BYTE OF 
PCCWSRCH IS THE SEARCH 
COMMAND CODE (X 1 31 ' ) . 

B. CHECK THAT THE FIRST BYTE OF 
PCCWTIC IS THE TIC COMMAND 
CODE (X'08') . 



04 J RETURN IS MADE TO THE CALLER 
WHEN AN ERROR IS FOUND OR 
VALIDITY CHECKING IS COMPLETE. 
THE POSSIBLE RETURN CODES ARE: 

A. - ELEMENT PASSED ALL TESTS. 

B. 4 - ELEMENT IS A PCCW BUT 
CONTAINS BAD DATA. 

C. 8 - ELEMENT IS NOT A PCCW. 



Diagram 25.27.14 ILRVPCCW (Part 1 of 1 
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Input 



Processing 



Output 



-iRSMHD 



RSMLIOQ 



FROM ASM 
RECOVERY 
ROUTINE 



fc> 



WORK AREA 



"U 



SAVE AREA 



WORK AREA 



QTYPE 



ILRVPCBQ: 

|01 | INITIALIZE QUEUE VERIFIER 
PARAMETER LIST WITH 
PARAMETERS UNIQUE TO THE 
VERIFICATION OF THE 
RSMLIOQ. 



| 02 | CALL COMMON ROUTINE TO 

INTERFACE WITH THE QUEUE 
VERIFIER. 



% 



TO CALLER 



WORK AREA 



QVPLEVR 



QVPLHDR 



QVPLFPTR 



QVPLTRLR 



QVPLBPTR 





r 




| REG 2 




_J ' *" 








RSMLIOQ 








| REG 15 


IK 


RETURN 
CODE 







ED 



INITIALIZE THE PARAMETERS OF THE 
QUEUE VERIFIER PARAMETER LIST 
THAT ARE UNIQUE TO THE 
VERIFICATION OF THE RSMLIOQ. 
THESE PARAMETERS ARE THE ADDRESS 
OF THE QUEUE HEADER (RSMLIOQF) , 
THE ADDRESS OF THE QUEUE TRAILER 

(RSMLIOQL) , THE ADDRESS OF THE 
ELEMENT VERIFICATION ROUTINE 

(ILRVPCB), THE OFFSET OF THE 
FORWARD CHAIN POINTER (PCBFQP, 3 
BYTE POINTER) , AND THE OFFSET OF 
THE BACKWARD CHAIN POINTER 

(PCBBQP, 4 BYTE POINTER) . 

CALL COMMON ROUTINE TO SET UP 
THE INTERFACE FOR THE QUEUE 
VERIFIER. SET QTYPE=3 TO 
INDICATE THE QUEUE IS A 
DOUBLE-HEADED, DOUBLE-THREADED 
QUEUE . 



Routine Label 



COMQRTN 



Diagram 25.27.15 ILRVPCBQ (Part 1 of 1) 
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Input 



Processing 



Output 



| REG 



]T?\ 



| REG 1 |i SDWA 



| REG 8 [i WORK AREA 



| REG 13 \i SAVE AREA 



ENTRY ILRVACEQ 
£ ENTRY 
ILRVACQ2 



| REG 8 | r-* 



WORK AREA 



QTYPE 



ILRVACEQ: 

|0l[ INITIALIZE QUEUE VERIFIER 
PARAMETER LIST WITH 
PARAMETERS UNIQUE TO THE 
VERIFICATION OF AN ACE 
QUEUE . 



| 02 I CALL COMMON ROUTINE TO 

INTERFACE WITH THE QUEUE 
VERIFIER. 



1U 



TO CALLER 



| REG 8 



WORK AREA 








QVPLEVR 




QVPLHDR 




QVPLFPTR 











JREG 15 


r 


RETURN 
CODE 











ENTRY IS FROM ASM RECOVERY 
ROUTINES. INITIALIZE THE 
PARAMETERS OF THE QUEUE VERIFIER 
PARAMETER LIST THAT ARE UNIQUE 
TO THE VERIFICATION OF AN ACE 
QUEUE. THESE PARAMETERS ARE THE 
ADDRESS OF THE QUEUE HEADER 
(VALUE OF REGISTER 0) , THE 
ADDRESS OF THE ELEMENT 
VERIFICATION ROUTINE (ILRVACE) , 
AND THE OFFSET OF THE FORWARD 
CHAIN POINTER (ACESRBWK FOR 
ENTRY ILRVACEQ, ACEFQPA FOR 
ENTRY ILRVACQ2 ) . 

CALL COMMON ROUTINE TO SET UP 
THE INTERFACE FOR THE QUEUE 
VERIFIER. SET QTYPE=1 TO 
INDICATE THE QUEUE IS A 
SINGLE-HEADED, SINGLE-THREADED 
QUEUE . 



COMQRTN 



Ref 



Diagram 25.27.16 ILRVACEQ (Part 1 of 1) 
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Input 



Processing 



Output 



| REG 



FROM ASM 
RECOVERY 
ROUTINE 



to 



ILRVIORB: 

| 01 | IF INPUT ADDRESS IS NOT 0, 
DETERMINE IF ENTIRE 
IORB-IOSB-SRB COMBINATION 
CAN BE REFERENCED. 



CD 



ADDRESS VERIFIER 



| 02 | VALIDITY CHECK IORB 
STORAGE: 

A. CHECK FOR IORB 
IDENTIFIER. 

B. CHECK THAT IORPARTE 
POINTS TO A PARTE. 



CO 



ADDRESS VERIFIER 



| 03 | VALIDITY CHECK IOSB 
STORAGE: 

A. CHECK IOSDVRID. 

B. CHECK IOSASID. 

I 04 I REFRESH IORB FIELDS. 



1U 



IORB 








IORFRPS 




IORIOSB 




IORSAVE 







| 01 | IF INPUT ADDRESS IS 0, A RETURN 
CODE OF 8 (NOT AN IORB-IOSB-SRB) 
IS SET. OTHERWISE, VERIFY THAT 
THE STORAGE POINTED TO BY THE 
IORB ADDRESS CAN BE REFERENCED. 
IF IT CANNOT, A RETURN CODE OF 8 
IS SET. 

| 02 | IF THE STORAGE CAN BE 

REFERENCED, VALIDITY CHECK THE 
IORB STORAGE. IF ANY OF THE 
TESTS FAIL, A RETURN CODE OF 8 
IS SET. 

A. CHECK THAT IORID CONTAINS THE 
IORB IDENTIFIER, X'88*. 

B. VERIFY THAT THE STORAGE 
POINTED TO BY IORPARTE CAN BE 
REFERENCED. IF IT CAN, CHECK 
THAT THE PARTE INDICATED BY 
PARENN (OR SARTE INDICATED BY 
SRENN, IF IORSWAP IS ON) IS 
THE SAME AS IORPARTE. 

1 03 1 IF THE IORB VALIDITY CHECKS, 

VALIDITY CHECK THE IOSB STORAGE. 
IF ANY TEST FAILS, A RETURN CODE 
OF 8 IS SET. 



A. CHECK THAT IOSDVRID CONTAINS 
IOSMISID (THE MISCELLANEOUS 
ID) . 

B. CHECK THAT IOSASID CONTAINS 1 

(MASTER SCHEDULER'S ADDRESS 
SPACE, ID) . 

IF ALL PREVIOUS VERIFICATIONS 
ARE SUCCESSFUL, REFRESH IORB 
FIELDS ORIGINALLY SET BY 
ILROPS00: THE IORFRPS FLAG, 
IORSAVE, AND IORIOSB. 



Diagram 25.27.17 ILRVIORB (Parti of 2) 



Section 2: Method of Operation 5 - 329 



VS2.03.807 



Input 



Processing 



Output 



05 REFRESH IOSB FIELDS. 



06 REFRESH SRB FIELDS. 



RETURN TO CALLER WITH 
INDICATION OF SUCCESS OR 
FAILURE. 



TO CALLER 













IOSCC3WE 


IOSIOR 


IOSPSLL 


IOSTSLL' 


IOSPGAD 


IOSSRB 


IOSUSE 


IOSNRM 


IOSABN 


IOSDIE 


IOSFMSK 









SRB 




SRBID 




SRBPARM 




SRBPRIOR 











[REG 15. 


r 


RETURN 
CODE 











| 05 | REFRESH IOSB FIELDS ORIGINALLY 

SET BY ILROPS00: FLAGS IOSCC3WE, 
IOSIDR, IOSPESLL, IOSTSLL, AND 
FIELDS IOSPGAD, IOSSRB, IOSUSE, 
IOSNRM, IOSABN, IOSDIE (WITH 
HIGH ORDER BIT ON), AND IOSFMSK. 

| 06 | REFRESH SRB FIELDS: SRBID, 
SRBPARM, AND SRBPRIOR. 

[07] RETURN IS MADE TO THE CALLER 
WHEN AN ERROR IS FOUND OR THE 
REFRESH IS COMPLETE. THE 
POSSIBLE RETURN CODES ARE: 

A. - STORAGE PASSED ALL TESTS 
AND WAS REFRESHED. 

B. 8 - STORAGE IS NOT AN 
IORB-IOSB-SRB. 



Diagram 25.27.17 ILRVIORB (Part 2 of 2) 
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Input 



Processing 



Output 




IF INPUT ADDRESS IS NOT 0, 
DETERMINE IF ENTIRE IGE 
CAN BE REFERENCED. 



c=> 



ADDRESS VERIFIER 



IF IOE CAN BE REFERENCED 
AND AN AIA IS CHECKPOINTED 
IN THE IOE, ROUTE CONTROL 
TO THE AIA VERIFICATION 
ROUTINE TO VERIFY THE AIA. 

RETURN TO CALLER WITH 
RETURN CODE INDICATING 
SUCCESS OR FAILURE. 



L^> 



TO ILRVAIA 



5=* 



TO CALLER 







|REG 15 | J 


RETURN 
CODE 









IF INPUT ADDRESS IS 0, A RETURN 
CODE OF 8 (NOT AN IOE) IS SET. 
OTHERWISE, VERIFY THAT THE 
STORAGE POINTED TO BY THE IOE 
ADDRESS CAN BE REFERENCED. IF IT 
CAN NOT, A RETURN CODE OF 8 IS 
SET. 

IF THE STORAGE CAN BE REFERENCED 
AND IOEAIA IS NOT 0, THE AIA 
VERIFICATION ROUTINE IS GIVEN 
CONTROL TO VERIFY THE AIA. THIS 
ROUTINE WILL RETURN DIRECTLY TO 
THE CALLER OF ILRVIOE. 

RETURN IS MADE TO THE CALLER 
WHEN AN ERROR IS FOUND OR IF 
ILRVAIA HAS NOT BEEN GIVEN 
CONTROL. THE POSSIBLE RETURN 
CODES ARE: 

A. - ELEMENT PASSED ALL TESTS. 

B. 8 - ELEMENT IS NOT AN IOE. 



Diagram 25.27.18 ILRVIOE (Part 1 of 1) 
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Input 



Processing 



FROM PURGEDQ 
(IEAVEPDQ) 



to 



Output 



| 01 | RE-SCHEDULE THE SRB 
DEQUEUED BY PURGEDQ. 

| 02 | RETURN TO PURGEDQ. 



TO PURGEDQ 



Notes 



|01 | THE SRB'S FOR PART MONITOR AND 
SWAP DRIVER SHOULD NOT BE 
PURGED. IF PURGEDQ IS EVER 
CALLED TO PURGE ALL SRB'S IN THE 
MASTER SCHEDULER'S ADDRESS 
SPACE, THIS ROUTINE RESCHEDULES 
THE SRB THAT WAS PURGED. 



Diagram 25.27.19 ILRPSRMT (Part 1 of 1) 
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Input 



Processing 



Output 



| REG 1 


I'- 








I 






| REG 8 


ll 


WORK AREA 












QTYPE 












| REG 13 


h 


SAVE AREA 








I 



fe 



COMQRTN : 

| 1 | IF QTYPE > 1 AND THE VALUE- 
OF THE HEADER ELEMENT IS 
0, SET THE VALUE OF THE 
TRAILER ELEMENT TO AND 
RETURN . 



5=> 



| 02 | COMPLETE THE 

INITIALIZATION OF THE 
QUEUE VERIFIER PARAMETER 
LIST. 

j 03 1 CALL ONE OF THE QUEUE 
VERIFIER ROUTINES 
ACCORDING TO THE QTYPE 
SPECIFIED. 



TO CALLER 



lW 



CO 



IEAVEQVX 



QUEUE VERIFIER 



| 04 | CONVERT RETURN INFORMATION- 
FROM QUEUE VERIFIER INTO 
RETURN CODE INDICATING 
SUCCESS OR FAILURE. 



±5 



u 



TO CALLER 



^ 




| REG 15 


H 


RETURN 
CODE 











| REG 8 



WORK AREA 








QVPLODA 




QVPLWKA 













SDWA 




| REG 





I'- 


'1 


1 


PARM 


LIST 


| REG 


1 


ll 








'I 


1 


SAVE 


AREA 


| REG 


13 


h 








'1 


1 







w 




JREG 15 


H 


RETURN 
CODE 











1 01 | FOR DOUBLE-HEADED QUEUES (QTYPE 
> 1 ) , CHECK THE VALUE OF THE 
HEADER ELEMENT FOR 0. IF IT IS 
0, NO FURTHER VERIFICATION NEEDS 
TO BE DONE. INSURE THAT THE 
VALUE OF THE TRAILER ELEMENT IS 
ALSO AND RETURN TO THE CALLER. 
IF THE HEADER ELEMENT IS NOT 
ZERO, CONTINUE. 

| 02 | INITIALIZE THE COMMON PARAMETERS 
FOR THE QUEUE VERIFIER, SUCH AS 
THE ADDRESS OF THE VARIABLE 
RECORDING AREA IN THE SDWA AND 
THE ADDRESS OF THE WORKAREA FOR 
THE QUEUE VERIFIER. 

| 03 | CALL THE APPROPRIATE QUEUE 

VERIFIER ROUTINE ACCORDING TO 
THE QTYPE SPECIFIED BY THE 
CALLER. 

A. QTYPE=1, VERIFY 
SINGLE-THREADED, 
SINGLE-HEADED QUEUE. 

B. QTYPE=2, VERIFY 
SINGLE-THREADED, 
DOUBLE-HEADED QUEUE. 



IEAVEQVO 



IEAVEQVO 



IEAVEQV1 



IEAVEQV2 



C. QTYPE=3, VERIFY 
DOUBLE-THREADED , 
DOUBLE-HEADED QUEUE. 

THE QUEUE VERIFIER RETURNS 
INFORMATION ABOUT HOW THE QUEUE 
WAS CORRECTED IN ADDITION TO A 
RETURN CODE INDICATING WHETHER 
ANY ERRORS WERE FOUND. PRESERVE 
ONLY THE RETURN CODE. 



IEAVEQVO 



IEAVEQV3 



Diagram 25.27.20 COMQRTN (Part 1 of 1) 
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Service Routines 

This section describes three service routines in 
ASM: 

• ilrpex — Pool Extender, 

• ILRTERMR — Address Space Termination 
Resource Manager, 

• ILRFMTOO — Control Block Formatter. 

Pool Extender 

The Pool Extender routine (ILRPEX) expands a 
pool of control blocks or work areas if the pool 
becomes temporarily empty. The ILRGMA macro 
(issued in mainline asm routines) passes control to 
ILRPEX. Input to ilrpex is the address of the 
appropriate pool controller. The pool controller 
contains the size of each cell and the number of 
cells to build for the expansion. ILRPEX obtains 
sufficient space from SQA and formats it by 
chaining together cell-sized portions of the storage. 
ILRPEX returns the first cell to the caller and places 
the remaining cells on the available queue of the 
pool controller. 

Address Space Termination Resource 
Manager 

The ASM Address Space Termination routine 
(ilrtermr) provides clean-up of asm resources 
during normal or abnormal address space 
termination and attempts to recover auxiliary 
storage resources from an address space that is 
terminating abnormally. All ASM resources for the 
address space including storage, control blocks, and 
auxiliary storage slots, are freed or marked to be 
freed when in-process operations complete. 

RTM (Recovery Termination Manager) gives 
control to ilrtermr during termination of any 
address space, ilrtermr attempts to free auxiliary 
storage slots assigned to private area address space 
pages and vio data set logical groups. Abnormal 
address space terminations are not scheduled while 
the address space is swapped out. If the address is 
swapped out, asm tables for the address space are 
unavailable; only swap sets assigned to the address 
space can be freed. 



The ASM termination routine also receives 
control during normal address space termination. 
This is a safety-valve type operation to assure that 
all auxiliary storage resources assigned to an 
address space have in fact been freed. If resources 
have not been freed, an error is assumed to have 
occurred and the error is recorded before 
attempting to free the resources. 

Another entry point of ilrtermr (ilrsltrv) 
receives control during memory creation (from 
IEA VITAS) to determine if there are enough slots to 
create a new memory. 

Control Block Formatter 

The system dump-printing routine (AMDPRDMP) 
invokes the Control Block Formatter (ILRFMTOO). 
ILRFMTOO calls ILRFMTPG, ILRFMTSW, and 

ilrfmtcv to format asm and shared RSM control 
blocks. The control blocks are contained in storage 
areas passed by amdprdmp. Formatting is done as 
follows: 

1. Beginning from the CVT address passed in 
the input parameter list, the routine attempts 
to access the ASMVT. If successful, it formats 
the ASMVT (including the bad slot error 
record, message buffer, ACEs and AlAs). 

2. Calls module ILRFMTPG to format the PART 
and its associated blocks (AlAs, lOEs, PARTEs, 
PCTs, PATs, IORBs, IOSBs and PCCWs). 

3. Calls ILRFMTSW to format the SART and its 
associated blocks (AlAs, sartes, SATs, sdcts, 
IORBs, IOSBs and SCCWs). 

4. Calls module ILRFMTCV at entry point 
ilrfmtc to format the common service area 
page tables (PGTs) and external page tables 
(XPTs). 

5. Calls module ILRFMTCV at entry point 
ilrfmth for each address space to format 
rsmhd, spct, asmhd, AlAs and private area 

PGT/XPTs. 

6. Calls module ilrfmtcv at entry point 
ilrfmtv to format LGVT and its associated 

blocks (LGEs, ASPCTs, LPMEs, ASSTs, 
AIA/ACEs). 
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Swap Formatter 
(ILRFMTSW) 


Page Formatter 
(ILRFMTPG) 


VIO Formatter 
(ILRFMTCV) 



25.x. - Module 

25.x.y. — Entry point in module 25.x. 

Figure 2-62. Service Routines Overview 
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Input 



Processing 



FROM RTM 
(IEAVTMTC) 



Qd 



LOCAL PCB -T 
I/O QUEUE 



0«fcput 



02 NORMAL TERMINATION. 



B. UPDATE AIAS ON LOCAL 
I/O QUEUE. 



C. GOTO STEP 4. 
[oTI ABNORMAL TERMINATION: 



IF A SWAP-OUT IS IN 
PROGRESS, FREE 
COMPLETED AND UNSTARTED 
LSQA SLOTS. SAVE 
PCB/AIAS . 



VALIDITY CHECK SEGMENT 
TABLE. IF ERROR, GOTO 



UPDATE AIAS ON LOCAL 
I/O QUEUE. 



ILRTERMR RECEIVES CONTROL FROM 
R/TM DURING TERMINATION OF ANY 
ADDRESS SPACE. ALL ASM RESOURCES 
FOR THE ADDRESS SPACE, INCLUDING 
STORAGE, CONTROL BLOCKS AND 
AUXILIARY STORAGE SLOTS, ARE 
FREED OR MARKED TO BE FREED WHEN 
IN-PROCESS OPERATIONS COMPLETE. 
THE SALLOC IS OBTAINED IN ORDER 
TO SERIALIZE ASM/RSM PROCESSING. 
AN FRR IS ESTABLISHED FOR 
RECOVERY. TERMRFRR, ANOTHER 
ENTRY IN ILRTERMR, HANDLES 
ERRORS OCCURRING IN ILRTERMR. 



THE RMPL IS CHECKED TO DETERMINE 
IF THE ADDRESS SPACE IS 
TERMINATING NORMALLY OR 
ABNORMALLY. THE FOLLOWING IS 
DONE FOR NORMAL TERMINATION: 



A LOCAL FLAG IS SET 
INDICATING THAT LSQA IS 
AVAILABLE. 



SCANNED. ALL AIAS ARE MARKED 
TO FREE THE SLOTS WHEN THE 
OPERATION COMPLETES AND TO 
INDICATE THAT TERMINATION HAS 
PROCESSED THEM. 



FOR ABNORMAL TERMINATION, THE 
LSQA IS NEEDED TO PERFORM SOME 
OF THE CLEAN-UP. 



A. IF LSQA IS AVAILABLE, AS 
INDICATED BY RSMFAIL=0, 
RSMLSOAF=0, AND NO SWAP 
OPERATION IN PROCESS, 
CONTINUE AT STEP 3D. 



IF THE ADDRESS SPACE IS 
SWAPPED OUT (RSMLSQAF=0) , OR 
IF A SWAP-IN IS IN PROGRESS 
BUT HAS NOT FAILED, AN ERROR 
EXISTS. A COD ABEND IS ISSUED 



IN ORDER TO RECORD THE ERROR, 
LSQA IS MARKED UNAVAILABLE, 
AND PROCESSING CONTINUES AT 
STEP 2B. IF A SWAP-IN FAILURE 
HAS OCCURRED (RSMFAIL=1), 
MARK LSQA UNAVAILABLE. 
CONTINUE AT STEP 2B. 



QUEUE. ALL AIAS ARE REMOVED 
FROM THE CAPTURE QUEUE AND 
THE SWAP QUEUE, AND SAVED ON 
AN INTERNAL QUEUE. 

SET LOCAL FLAG INDICATING 
THAT LSQA IS AVAILABLE. 

THE SEGMENT TABLE IS VALIDITY 
CHECKED TO PREVENT ANY 
OBVIOUS ERRORS. IF IT IS 
INVALID, LSQA IS MARKED 
UNAVAILABLE AND PROCESSING 
CONTINUES AT STEP 2B. 



THE LOCAL I/O QUEUE IS 
SCANNED. PROCESSING IS 
IDENTICAL WITH STEP 2B. AN 
ADDITIONAL SCAN OF THE QUEUE 
IS MADE IF LSQA IS AVAILABLE. 
XPTVALID IS TURNED OFF FOR 
INCOMPLETE, NON-VIO, NON-LSQA 
WORK NOT MARKED TO BE FREED 
BECAUSE THE SLOT WILL BE 
FREED WHEN THE OPERATION 
COMPLETES. THIS PREVENTS 
ILRTERMR FROM FREEING THE 
SLOT IN LATER PROCESSING. 



ILRFRSLT 
ILRFRSLT 



ILRFRSL1 
ILRFRSW1 
TERMSOUT 



TERMAIA1 
TERMAIA2 



Diagram 25.28 ILRTERMR (Parti of 3) 
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04 PERFORM VIO ASPCT 

1 1 PROCESSING IF LSQA IS 

AVAILABLE, FREE UNSAVED 
SLOTS. 



PERFORM VIO COMMON 
PROCESSING - CLEAN UP VIO 
WORK. 



A. FREE AIA WORK ELEMENTS 
- SAVE AIAS WHICH ARE 
NOT IN PROCESS ON 
INTERNAL QUEUE (SEE 



B. 



STEP 3C) , 



PLACE RELEASE LG ACES 
ON TASK-MODE RELEASE 
QUEUE. 





J | RELEASE LG| 










BKSLT 









Notes 



04 IF LSQA IS AVAILABLE, ASPCT 

1 1 PROCESSING IS DONE. ALL LGE'S 

QUEUED FROM THE ASMHD ARE 
PROCESSED. VIO SLOTS ARE FREED. 
THESE ARE UNSAVED SLOTS, OR 
SLOTS RELEASED AFTER SAVE. 



IN PROCESS VIO WORK IS CLEANED 
UP AND GLOBAL RESOURCES ARE 
FREED. ALL LGE^S QUEUED FROM THE 
ASMHD ARE PROCESSED. 



ALL WORK ELEMENTS ARE 
DEQUEUED FROM THE LGE PROCESS 

8UEUES. AIAS WHICH ARE FOR 
NSTARTED WORK (AIA NOT IN 
PROCESS) ARE SAVED ON AN 
INTERNAL QUEUE SINCE THEY 



ALL ACES ARE DEQUEUED AND 
RETURNED TO THE POOL EXCEPT 
FOR RELEASE LG ACES FOR WHICH 
TASK MODE RELEASE PROCESSING 
IS NEEDED. 



RELEASE LG ACES NEEDING TASK 
MODE RELEASE PROCESSING ARE 
PLACED ON THE TASK MODE 



PROCESSING IS NOT POSTED AT 
THIS TIME. THE RELEASE 
PROCESSING WILL OCCUR WHEN 
TASK MODE RELEASE PROCESSING 
IS POSTED LATER. 



D. THE LGES AND SRB USED FOR VIO 
ARE FREED. LGVTES ARE MADE 
AVAILABLE BY QUEUEING THEM TO 
THE AVAILABLE^UEUE IN THE 
LGVT. 



ILRFRSLT 
ILRALS00 



Diagram 25.28 ILRTERMR (Part 2 of 3) 
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RSMHD SPCT 








IVI I 




y 








I 






J 








PGT 1 ' 




XPT 1 


















ASMHD 1 -l—i 

Tl 






ASMVT | — 








\ 




\ 











Processing 



Output 



06 FREE PRIVATE AREA SLOTS. 



|07| RETURN SLOTS TO UNRESERVED- 
I 1 COUNT . 



08 CALL IEAVPIOP TO FREE 

1 1 PCB/AIAS AND FRAMES NO 

LONGER NEEDED. 



09 FREE RECOVERY AND SALLOC. 



I 10| PURGE/DEQUEUE THE VIO SRB 
1 1 IF IT IS SCHEDULED. 



11 POST TASK MODE RELEASE ECB 

1 1 IF THERE IS ANY TASK-MODE 

RELEASE WORK. 



ASMVT ACE 



RELEASE LG 



FOR ABNORMAL TERMINATION . WITH 
LSQA AVAILABLE, PRIVATE AREA 
SLOTS WHICH ARE STILL ALLOCATED 
ARE FREED. THIS IS DONE BY USING 
THE SPCT SEGMENT ENTRIES TO FIND 
ALL THE VALID PAGE TABLES AND 
EXTERNAL PAGE TABLES, AND 
FREEING ALL SLOTS WHICH ARE 
STILL MARKED VALID. 



THE UNRESERVED SLOT COUNT IN THE 
ASMVT IS UPDATED. 



08 ALL PCB/AIAS (AND THEIR 

1 1 ASSOCIATED FRAMES) WHICH ARE NO 

LONGER NEEDED ARE FREED. THESE 
INCLUDE THE LSQA SWAP-OUT 
PCB/AIAS WHICH HAVE COMPLETED, 
AND VIO WORK WHICH HAS NOT BEEN 
STARTED. ALL IN-PROCESS WORK 
WILL BE FREED AS THEY COMPLETE 
BECAUSE OF THE FLAGGING OF THE 
AIAS. 



THE VIO SRB IS PURGE/DEQUEUED IF 
IT HAS BEEN SCHEDULED. THIS IS 
NECESSARY SINCE THE STORAGE 
CANNOT BE FREED IF THE SRB IS ON 
A DISPATCHER QUEUE. THE SRB 
STORAGE WILL BE FREED BY 
IEAVDLAS . 



un 



IF.THERE IS ANY WORK ON THE TASK 
MODE RELEASE REQUEST QUEUE IN 
THE ASMVT, THE TASK MODE RELEASE 
PROCESSOR ECB IN THE ASMVT IS 
POSTED. 



ILRFRSL1 
TERMPA 
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FROM RTM 
(IEAVTRTS) 



SDWAPARM 



S 



] 



fc> 



01 SET UP ADDRESSABILITY 

> 1 WITHIN ILRTERMR AND TO 

ILRTERMR T S WORKAREA. 



02 OBTAIN ADDRESSABILITY TO 

1 ■ MASTER SCHEDULER ADDRESS 

SPACE . 



04 IF A CONTROL BLOCK QUEUE 

1 1 WAS BEING PROCESSED, CALL 

THE APPROPRIATE 
VERIFICATION ROUTINE. 



CO 



ILRVSPAQ ILRVPCBQ 
OR ILRVLPRQ 



ASM ROUTINES 



05 SET UP RETRY ADDRESS. 



06 IF RETRY IS NOT POSSIBLE, 
1 1 FREE ILRTERMR T S WORKAREA. 



im 



07 RETURN TO RTM. 



JP 



SDWA 














SDWA 










SDWARTYA 











REGISTER 1 CONTAINS THE ADDRESS 
OF THE SDWA WHICH CONTAINS THE 
ADDRESS OF THE ATA. THE ATA 
CONTAINS OTHER NEEDED ADDRESSES 
(RMPL, WORKAREA) . 



TRAS IS NECESSARY TO GET 
ADDRESSABILITY TO THE CORRECT 
ADDRESS SPACE TO RECOVER. 



THE ROUTINES THAT COULD BE 
CALLED ARE: ILRVSPAQ, ILRVPCBQ, 
AND ILRVLPRQ. 



RETRY IS NOT POSSIBLE IF SO 
INDICATED IN THE SDWA 
(SDWARCDE) . 



07 IF RETRY IS POSSIBLE, ILRTERMR 

1 1 WILL GET CONTROL AT ITS NEXT 

RETRY POINT. 



ILRFRR01 
ILRFRR01 
ILRFRR01 



ILRVSPAQ 
ILRVPCBQ 
ILRVLPRQ 



Diagram 25.28.1 TERMRFRR (Part 1 of 1) 
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POOL 
CONTROLLER 



























FROM INVOKER 
OF ILRGMA 
MACRO 



fc> 



J 



01 REQUEST SALLOC LOCK AND 

' 1 SAVE CALLERS REGISTERS IN 

THE ASMVT. 



02 IF THE SALLOC LOCK WAS 

1 1 HELD BY THE CALLER. REMOVE 

AN ACE CELL FROM THE ACE 
RESERVE POOL. 



uu Diiini. j. x xo nun nttULr. 
IF THE INPUT POOL IS NOT 
EMPTY, REMOVE A CELL FROM 
THE POOL. 



IF THE INPUT POOL IS EMPTY 
AND THE CALLER DID NOT 
HOLD THE SALLOC LOCK, SQA 
SPACE IS OBTAINED VIA 
GETMAIN AND FORMATTED. THE 
FIRST CELL FORMATTED IS 
SAVED FOR RETURN TO THE 
CALLER . 





REG 1 






OR CELL 
ADDR 













THE ASM POOL EXTENDER, ILRPEX, 
RECEIVES CONTROL FROM ANY ASM 
ROUTINE INVOKING THE ILRGMA 
MACRO WHEN THE POOL BEING 
PROCESSED IS EMPTY. ILRPEX WILL 
BE CALLED ONLY FOR EXPANDABLE 
POOLS. INPUT REGISTERS 13 AND 14 
MUST BE SAVED ACROSS THE SETLOCK 
FOR THE SALLOC LOCK. ONCE THE 
SALLOC LOCK IS HELD. THE 
CALLER'S REGISTERS ARE SAVED IN 
THE ASMVT WORK SAVE AREA 
RESERVED FOR ILRPEX. 



02 THE RETURN CODE FROM THE SETLOCK 



ONLY POOL FROM WHICH CELLS CAN 
BE REQUESTED HOLDING SALLOC IS 
THE ACE POOL. IF THE ACE POOL 
CONTROLLER ADDRESS WAS PASSED AS 
INPUT, A CELL IS REMOVED TO BE 
RETURNED TO THE CALLER. IF THE 
POOL WAS EMPTY OR THE ACE POOL 
WAS NOT PASSED AS INPUT, A ZERO 
CELL ADDRESS IS RETURNED. 



THE SALLOC LOCK WAS OBTAINED BY 
ILRPEX IF THE SETLOCK RETURN 
CODE WAS ZERO. IN THIS CASE, THE 
POOL MUST BE CHECKED TO SEE JF 
IT HAD ALREADY BEEN EXPANDED BY 
ILRPEX RUNNING ON ANOTHER CPU. 
IF SO. THE POOL IS NOT EMPTY AND 
A CELL IS REMOVED FROM THE POOL 
TO BE RETURNED TO THE CALLER. 



LE 



THE AMOUNT OF SQA SPACE TO 
OBTAIN IS DETERMINED BY THE SIZE 
AND NUMBER OF CELLS INDICATED IN 
THE POOL CONTROLLER. IF THE 
GETMAIN FAILS, A ZERO ADDRESS IS 
RETURNED TO THE CALLER. 



REGISTERS ARE RESTORED AND THE 
CELL ADDRESS > IS n PASSED BACK IN 
REG 1 . THE SALLOC LOCK IS 
RELEASED ONLY IF THE CALLER DID 
NOT HOLD IT AT ENTRY TO ILRPEX. 



Ref 



Diagram 25.29 ILRPEX (Part 1 of 1) 
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REGISTER 1 



r 



FROM ABDPRUIM 



fc> 



01 FORMATTER OF ASM CONTROL 
1 1 BLOCKS. 



I 02 I ACCESS AND FORMAT ASMVT 
1 ■ AND ASSOCIATED BLOCKS. 



03 ACCESS AND FORMAT PART AND- 
1 ■ ASSOCIATED BLOCKS. 



CO 



ASM ROUTINE 





ASMVT A£E 


1 II 1 


AIA MSGBF 


1 II 1 


EREC 


1 1 






PART PCT 


1 II 1 


PAT PCCW 


1 II 1 


AIA IOSB 


1 II 1 


IOE 


1 1 


IORB 


1 1 







WHEN PRINT DUMP (AMDPRDMP) 
PROGRAM IS EXECUTED WITH THE 
ASMDATA CONTROL STATEMENT 
INCLUDED. ILRFMT00 IS ENTERED. 
THE ASM CONTROL BLOCKS AND SOME 
RSM CONTROL BLOCKS ALSO USED BY 
ASM ARE FORMATTED. THE CONTROL 
BLOCK INFORMATION CAN THEN BE 
EASILY FOUND AND READ. 



02 THE ASMVT IS ACCESSED VIA THE 

1 ■ CVTASMVT FIELD. IT IS FORMATTED 

FOLLOWED BY: 



A. AIA'S CHAINED FROM ASMSTAGQ. 

B. THE MESSAGE BUFFER, ASMMSGBF. 



ACE'S CHAINED FROM ASMRLGRQ 
AND ASMRLGWQ. THEN THE OTHER 
MODULES ARE CALLED IN TURN, 
ILRFMTPG, ILRFMTSW, 
ILRFMTCV (ILRFMTCT, ILRFMTCV 
TlLRFMTH) , ILRFMTCV 
( ILRFMTV) . 



THE PART IS ACCESSED FROM 
ASMPART AND FORMATTED, ALONG 
WITH: 1A) PCTS CHAINED FROM 
PARTPCTQ. (B) ERROR AIA^S FROM 
PARTAIAE AND (C) IOES FROM 
PARTCOMQ, PARTSPLQ, PARTDUPQ, 
PARTLOCQ. NEXT, EACH PART ENTRY 
IS FORMATTED ALONG WITH: (A) PAT 
FROM PAREPATP. (BY IOES FROM 
PAREIOE, AND (CV IORBS. IOSBS 
AND PCCWS AND AIAS FOUND VIA 
PAREIORB. 



Routine Label Ref 



Diagram 25.30 ILRFMT00 (Part 1 of 3) 
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|04J ACCESS AND FORMAT SART AND- 
1 ■ ASSOCIATED BLOCKS. 



CO 



ASM ROUTINE 



05 ACCESS AND FORMAT COMMON 

1 1 SERVICE AREA PAGE TABLES 

AND EXTERNAL PAGE TABLES. 



CO 



ILRFMTCV ENTRY 



^> 



THE SART IS ACCESSED FROM 
ASMSART AND FORMATTED ALONG WITH 
AIAS FROM SARWAITQ. AND THE SDCT 
AND ITS ENTRIES. EACH SART ENTRY 
IS FORMATTED WITH ITS 
ASSOCIATED: 



A. SAT FROM SRESAT 

B. SCCW FROM SRESCCW AND. 

C. IORBS, IOSBS, SCCWS AND AIAS 
FROM SREIORB. 



THE COMMON SERVICE AREA PAGE AND 
EXTERNAL PAGE TABLES ARE 
ACCESSED VIA THE MASTER 
SCHEDULER SEGMENT TABLE 
(PSASTOR) . EACH PAGE TABLE (PGT) 
AND ITS ASSOCIATED EXTERNAL PAGE 
TABLE (XPT) ARE FORMATTED. 



Diagram 25.30 ILRFMTOO (Part 2 of 3) 
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Output 



ACCESS AND FORMAT FOR EACH- 
ADDRESS SPACE, THE RSMHD, 
ASMHD AND ASSOCIATED 
BLOCKS, PRIVATE AREA PAGE 
TABLES AND EXTERNAL PAGE 
TABLES . 



<X> 



CD 



ILRFMTCV ENTRY 



ILRFMTCV ENTRY 



08 RETURN. 




L=> 



TO CALLER 



RSMHD AIA 


1 II 1 


ASMHD PGT 


1 II 1 


SPCT XPT 


1 II 1 


LGE 


1 1 






LGVT AIA 


1 II 1 


ASPCT 


1 1 


ACE 


1 1 





THE RSMHD IS ACCESSED VIA 
CVTASVT AND ASCBRSM. IT AND THE 
SPCT ARE FORMATTED. THEN THE 
ASMHD IS FORMATTED WITH: 



AIAS FROM ASHSWAPQ AND 
ASHCAPQ. 



PGT/XPTS FOR THE PRIVATE AREA 
OF THAT ADDRESS SPACE VIA 
SPCTPGT. 



[07] 



THE LGVT IS ACCESSED VIA 
ASMLGVT. THE LGVT ENTRY FOR THAT 
ADDRESS SPACE IS LOCATED AND 
FORMATTED WITH THE ASSOCIATED: 



A. LGE FROM LGVELGEP. 



B. AIAS FROM LGEPROCQ AND 

C. ASPCT FROM LGEASPCT AND 
LPME T S AND/OR ASSTS, IF 
PRESENT. ALSO AI A/ACE'S 
CHAINED FROM AIACEPTR. 



08 RETURN TO CALLER. 
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Page Expansion 

The dynamic page expansion facility (ILRPGEXP) 
allows the system operator to add page or swap 
data sets to the system by entering the PAGEADD 
command. The number of page or swap data sets 
that can be added throughout one ILP is limited to 
the number specified by the PAGNUM system 
parameter at IPL time. 

Control Blocks Used 

The major control blocks ILRPGEXP uses are: 
• ASMVT — Auxiliary Storage Management 
Vector Table 

PART — Page Activity Reference Table 
PAT — Page Allocation Table 
SART — Swap Activity Reference Table 
SAT — Swap Allocation Table 
Data Set Name List 

ILRTPARB — TPARTBLE 

PCT — Performance Characteristics Table 

The ASMVT resides in the nucleus and is ASM's 
extension of the CVT. It contains a count of 
available slots and back slots that are changed 
when slots are allocated and page data sets are 
added. The ASMVT also contains an indicator that 
specifies whether TPARTBLE is valid or not 

(ASMNOTPT). 

The PART resides in SQA and consists of one 
header and an entry (PARTE) for each page data 
set that is open and for the number of entries 
required to support page expansion. When a page 
data set is added, ILRPGEXP updates an empty 
PARTE and chains it to the others. 

The pat resides in SQA and contains a bit map 
of allocated and unallocated page slots. 

The SART resides in SQA and consists of a 
header and an entry (SARTE) for each swap data 
set and additional entries for the number of swap 
sets that may be added. 

The sat resides in SQA and describes the 
allocated and* available slots for a swap data set. 

The Data Set name lists reside in CSA and 
contain lists of swap and page data set names that 



are currently in use; they also have additional 
entries for page and swap data sets to be added by 
page expansion. 

ILRTPARB (TPARTBLE) resides on the plpa page 
data set. It is built during IPL, contains the page 
data set information that is used when quick or 
warm starting. ILRPGEXP updates ILRTPARB when 
a new page data set is added. 

Processing 

The Master Scheduler attaches ILRPGEXP when the 
operator issues the PAGEADD command, passing 
the command text in a CSCB (Command Scheduling 
control block). ILRPGEXP loads the read/ write 
routine (ILRPREAD) and the open routine 
(ilropsoo), establishes an estae, syntax checks 
the command, and then processes the page or swap 
data set request(s). If there is more than one 
request the process is repeated as many times as 
necessary. 

Page Data Sets 

ILRPGEXP calls ILRPREAD to read the TPARTBLE 

and calls ilropsoo to open the page data set. 

ilrpgexp then updates the following control 
blocks. If the page data set being added is of a 
different device type than the existing page data 
sets, ILRPGEXP builds a PCT. Then it finds an 
empty PARTE, fills it in, and chains it to the others. 
Next ilrpgexp gets storage for and initializes a 
pat to reflect the available slots on the new page 
data set. Finally, ILRPGEXP updates the TPARTBLE, 
the data set name list, increases the slot and back 
slot counts in ASMVT, and calls ILRPREAD to write 
the tpartble back to the plpa data set. 

Swap Data Sets 

ilrpgexp calls ILROPSOO to open the data set, fills 
in and chains a sarte, updates the SART header, 
builds a SAT to reflect available swap space, and 
updates the data set name list. 
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Page Expansion 
















25.31 






Page Expansion 
(ILRPGEXP) 




























25.32 






25.33 


Open Pa 
Swap D« 
(ILROP 


ge 
rta 
S0( 


and 
Sets 


Special I/O to 
Page Data Sets 
(ILRPREAD) 



25.x. - Module 

25.x.y. — Entry point in module 25.x. 

Figure 2-63. Page Expansion Overview 
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ILRPGEXP: 



| 02 | ESTABLISH ESTAE. 



03 PAGEFIX THE MODULE. 



SYNTAX CHECK COMMAND. 
STEPS 5-15 ARE FOR ADDING 
A PAGE DATA SET. SEE STEPS 
16-22 FOR SWAP DATA SETS. 
(THESE STEPS ARE EXECUTED 
FOR ONE DATA SET AT A 
TIME) . 



IF TPARTBLE IS NOT 
USEABLE, GOTO STEP 8. 



ILRPGEXP (ALIAS IEEPGEXP) IS 
ENTERED WHENEVER THE PAGEADD 
COMMAND IS ISSUED BY THE 
OPERATOR. ITS PURPOSE IS TO ADD 
PAGE DATA SET(S) OR SWAP DATA 
SET(S) TO THE SYSTEM. THE ENQ 
MACRO IS USED TO KEEP SUBSEQUENT 
PAGEADD COMMANDS FROM EXECUTING 
BEFORE THIS ONE HAS COMPLETED. 



ILRPGEXP SETS UP THE INTERFACE 
TO IEECB860, THE MASTER 
SCHEDULER USER ESTAE ROUTINE AND 
THEN ESTABLISHES ITS OWN ESTAE, 
ESTAER (ANOTHER ENTRY IN 
ILRPGEXP) . 



A PAGEFIX IS NEEDED IN ORDER TO 
OBTAIN THE SALLOC LOCK FOR 
SERIALIZATION OF CONTROL BLOCKS. 



THE DATA SET NAMES ARE CHECKED 
FOR THE CORRECT LENGTH AND FOR 
DUPLICATES. IF THE LENGTH IS 
INCORRECT OR IF THERE ARE 
DUPLICATES, THE OPERATOR IS 



NOTIFIED. 



THERE IS ONLY ROOM IN THE PART 
TO PROCESS THE NUMBER OF PAGE 
DATA SETS SPECIFIED ON THE 
PAGNUM SYSTEM PARAMETER. 



06 IF TPARTBLE IS UNUSEABLE, 
I— J (ASMNOTPT=1) , THEN IT IS NOT 
USED OR UPDATED. 



Diagram 25.31 ILRPGEXP (Part 1 of 4) 
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07 IF TPARTBLE HASN'T BEEN 

' 1 READ YET, GETMAIN AN AREA 

FOR IT AND READ IT. 



1 08 1 OPEN THE DATA SET, CALL 
■ 1 ILROPSOO_ 



co> 



ASM ROUTINE 



09 SEARCH EXISTING PCTS FOR A- 

1 1 DEVICE TYPE MATCH. IF 

THERE IS NO MATCH, GETMAIN 
AN AREA FOR A NEW PCT AND 
BUILD IT. 

llOl FILL IN FIELDS IN THE 
I 1 PARTE . 



J7=> 



I 11 I GETMAIN AND INITIALIZE A 
' ' PAT. 



TPARTBLE 
WORKAREA 














PCT 










PARTE 






PARESZSL 




PAREEDBP 


PAREUCBP 


PAREIORB 


PAREPCTP 




PAT 










DATASET NAME 
LIST 















Notes 


Routine 


Label 


Ref 


Notes 


Routine 


Label 


Ref 


I 07 I IF THE GETMAIN OR READ FOR 

> 1 TPARTBLE FAILS, ASK THE OPERATOR 


ILRPREAD 


ILRPREAD 


























IF HE WANTS TO CONTINUE. 
















I 08 I IF SUCCESSFUL, ILROPS00 WILL 

< ' RETURN WITH THE NUMBER OF SLOTS 


ILROPS00 


ILROPSOO 


























IN THE DATA SET AND ADDRESSES OF 
















THE IORB, EDB, AND UCB CONTROL 
BLOCKS. FOR MOUNT, GETMAIN AND 
LOCATE ERRORS ON OPEN 












































PROCESSING, THE REQUEST FOR THIS 
DATA SET IS FAILED. THE OPERATOR 






























IS NOTIFIED. 
















1 09 1 A DIFFERENT PCT IS NEEDED FOR 
1 ' EACH OPEN PAGE DATA SET DEVICE 






























TYPE. IF THE NEW PAGE DATASET IS 
















ON A DIFFERENT DEVICE FROM THE 
















EXISTING ONES A NEW PCT IS 
















NEEDED. IF THE GETMAIN FOR THE 
















PCT FAILS THE OPERATOR IS TOLD 
















AND THIS PAGE DATA SET REQUEST 
















IS FAILED. 
















|10| ADDRESSES OF CONTROL BLOCKS AND 
1 ' THE NUMBER OF SLOTS FOR THIS 






























DATA SET RETURNED FROM ILROPS0O 
















ARE PUT INTO THE PARTE. THE 
















ADDRESS OF THE PCT IS ALSO 
















INCLUDED. 
















1 11 1 IF THE GETMAIN FOR THE PAT 

1 > FAILS, NOTIFY THE OPERATOR AND 

FAIL THIS DATA SET REQUEST. 












































[Til THE DATA SET NAME LIST IS USED 
' 1 FOR CHECKING NEW DATA SET NAMES 






























AGAINST EXISTING ONES. 
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13 IF THE TPARTBLE IS GOOD, 

1 1 FILL AN ENTRY WITH PAGE 

DATA SET INFORMATION. 



UPDATE THE TPARTBLE 
HEADER AND WRITE 
TPARTBLE BACK TO THE 
PLPA DATA SET. 



■^=> 



ASM ROUTINE 



B 



~i=> 



TELL THE OPERATOR THE DATA- 
SET IS NOW AN ACTIVE PAGE - 
DATA SET. GOTO STEP 4 FOR 
ADDITIONAL PAGE DATA SETS. 
IF THERE ARE NO MORE, 
CONTINUE AT STEP 23. 



Sj 



un 



IF TPARTBLE IS NOT GOOD 
(ASMNOTPT=1) , IT IS NOT UPDATED. 



AFTER THE DATA SET IS OPENED AND 
COMPLETELY INITIALIZED IT CAN BE 
USED BY ASM. 



IF THE WRITE OF TPARTBLE 
FAILS, THE OPERATOR IS ASKED 
IF HE WANTS TO CONTINUE. 



THE SALLOC LOCK IS OBTAINED 
TO UPDATE THE COUNT OF LOCAL 
PAGE DATA SETS TPARTLCNT) AND 
THEN RELEASED. THE PAGE DATA 
SETS IN USE COUNT (PARTEUSE) 
IS INCREMENTED, AND THE PARTE 
IS CHAINED VIA PAREPARE. 



C. THE TOTAL PAGE SLOTS COUNT IN 
THE ASMVT IS INCREMENTED. 
ALSO THE AVAILABLE SLOTS FOR 
BACKING (ASMBKSLT) AN ADDRESS 
SPACE OR VIO DATA SET IS 
INCREMENTED. 



Diagram 25.31 ILRPGEXP (Part 3 of 4) 
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16 STEPS 16-22 ARE FOR 

' ' PROCESSING SWAP DATA SETS. 

CHECK FOR ROOM IN THE 
SART. 

[771 OPEN THE DATA SET, CALL 
I 1 TT.ROPS00. 



CO 



ASM ROUTINE 



"I! 



18 FILL IN THE SARTE. 



19 GETMAIN AND BUILD A SAT. 



JP 



ED 



CHAIN THE SARTE AND UPDATE- 
THE SART HEADER. (THIS IS - 
DONE HOLDING THE SALLOC 
LOCK.) 



£pC> 



TELL THE OPERATOR THE SWAP- 
DAT AS ET IS NOW AN ACTIVE - 
SWAP DATA SET. FOR MORE 
DATA SETS GOTO STEP 16, 
OTHERWISE CONTINUE. 



24 PREPARE FOR EXIT. 



s? 



THERE IS ONLY ROOM IN THE SART 
TO PROCESS THE NUMBER OF SWAP 
DATA SETS SPECIFIED ON THE 
PAGNUM SYSTEM PARAMETER. 



17 IF SUCCESSFUL, ILROPS00 RETURNS 

' 1 WITH THE NUMBER OF SLOTS ON THIS 

DATA SET AND ADDRESSES OF THE 
I ORB, EDB, AND UCB CONTROL 
BLOCKS. UPON RETURN, THE NUMBER 
OF SLOTS IS CONVERTED TO THE 
NUMBER OF SWAP SETS. FOR MOUNT 
GETMAIN AND LOCATE ERRORS ON 
OPEN, THE OPERATOR IS TOLD AND 
PROCESSING FOR THIS DATASET IS 
FAILED. 



ADDRESSES OF CONTROL BLOCKS 
RETURNED BY ILROPS00 ARE PUT 
INTO THE SART ENTRY. ALSO PUT IN 
THE ENTRY IS THE NUMBER OF SWAP 
SETS (SRETOTSL) . 



QE 



IF THE GETMAIN FOR THE SAT 
FAILS, THE OPERATOR IS TOLD AND 
PROCESSING FOR THIS DATASET IS 
FAILED. 



THE DATA SET NAME LIST IS USED 
FOR CHECKING NEW SWAP DATA SETS 
AGAINST ALREADY EXISTING ONES. 



\E 



THE SALLOC LOCK IS NEEDED TO 
KEEP ASM FROM USING THE SART 
WHILE IT IS BEING UPDATED. 



BEFORE RETURNING CONTROL, 
ILRPGEXP REMOVES ITS ESTAE FOR 
RECOVERY, DEQUEUES FROM THE 
PAGEADD RESOURCE AND ISSUES A 
PGFREE MACRO. 



Diagram 25.31 ILRPGEXP (Part 4 of 4) 
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INFORMED THAT FUTURE QUICK 
OR WARM STARTS WILL HAVE 
RANDOM RESULTS. 



VERIFY THAT ALL CONTROL 
BLOCK ADDRESSES ARE VALID 
ADDRESSES . 



FREE ALL VALID CONTROL 
BLOCKS THAT ILRPGEXP AND 
ILROPS00 BUILT PRIOR TO 
THE ERROR. 



05 RETURN TO RTM. 



1 01 | ESTAER IS PHYSICALLY CONTAINED 
I 1 WITHIN TT.RPfiEXP'S FTRST RASE 



IF ILRPREAD WAS IN CONTROL, AN 
ATTEMPT WAS BEING MADE TO READ 
OR WRITE TPARTBLE. IF TPARTBLE 
IS BAD. IT MAY NO LONGER BE 
POSSIBLE TO QUICK OR WARM START. 
MESSAGE IEE789I IS ISSUED TO 
INFORM THE OPERATOR OF THE 
SITUATION. 



ALL ADDRESSES OF CONTROL BLOCKS 
OBTAINED BY ILRPGEXP AND 
ILROPS00 ARE VALIDITY CHECKED. 



THE CONTROL BLOCKS FREED INCLUDE 
THE PCT, PAT, SAT, EDB, AND 
IORB. ALSO, THE RELATED CONTROL 
BLOCK ENTRIES IN THE PART, SART, 
AND DATA SET NAME LIST ARE 
CLEARED. 



Diagram 25.31.1 ESTAER (Part 1 of 1) 
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1 01 I OPEN A PAGE OR SWAP DATA 
SET. 

| 02 | PREPARE THE CATALOG LOCATE- 
PARAMETER LISTS. 

| 03 | LOCATE DATA SET IN 
CATALOG . 

A. PAGE DATA SET - LOCATE 
PAGE DATA SET. 

B. SWAP DATA SET - LOCATE 
SWAP DATA SET. 

| 04 | MOUNT DATA SET. 

A. NIPTIME - USE NIP 
SERVICE. 

B. AFTER NIP TIME - USE 
DYNAMIC ALLOCATION. 



CI PARMLIST 



ILROPS00 OPENS A PAGE OR SWAP 
DATA SET FOR ASM'S RIM 
(ILRASRIM) DURING SYSTEM 
INITIALIZATION OR FOR PAGE 
EXPANSION (ILRPGEXP) AFTER I PL. 

INITIALIZE THE CATALOG LOCATE 
PARAMETER LISTS (CTGPL) AND 
CATALOG FIELD PARAMETER LISTS 
(CTGFLS) FOR CLUSTER LOCATE AND 
DATA CONTROL INTERVAL (CI) 
LOCATE, RESPECTIVELY. 
INFORMATION, SUCH AS DATA SET 
TYPE, VOLSER, ATTRIBUTES, DEVICE 
TYPE AND STATISTICAL DATA WILL 
BE REQUESTED FROM VSAM CATALOG. 

ISSUE THE TWO LOCATES TO LOCATE 
PAGE OR SWAP DATA SET . CHECK 
THE RETURN PARAMETER TO INSURE 
THE REQUESTED DATA SET IS 
LOCATED, AND CHECK THAT TRACK 
OVERFLOW IS NOT INDICATED FOR 
SWAP DATA SET. IF LOCATE FAILS, 
SET RETURN CODE TO '12' IN 
REGISTER 15 AND RETURN TO 
CALLER . 



LOCPAGE 
LOCSWAP 



MOUNT METHOD IS BASED ON THE 
TIME REQUESTED. NIPMOUNT IS USED 
AT NIPTIME, DYNAMIC ALLOCATION IS 
USED AFTER NIP TIME. IF MOUNT 
FAILS, RETURN TO CALLER WITH 
'08' IN REGISTER 15. 



VMTVER 
DYNALLO 



Diagram 25.32 ILROPS00 (Part 1 of 2) 
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DETERMINE THE TYPE OF PATH 
REQUESTED. 

A. SHORT PATH - RETURN TO 
CALLER. 



B. LONG PATH - CONTINUE. 

GET CORE AND BUILD CONTROL- 
BLOCKS . 

RETURN TO CALLER WITH A 
RETURN PARAMETER LIST AND " 
RETURN CODE IN REG 15. 



i=> 



IORB 



EDB 

IOSB 

SRB 



LPMB 



p_ r - 




FLAG 


1 l J 


ADDR OF 
IORB 


ADDR OF 
UCB 


ADDR OF 
EDB 


SLOT NO. 


DEV TYPE 


VOL SER 


SQA PTR 


SQA LEN 





SHORT PATH IS ONLY (MEANING 
CONTROL BLOCKS SHOULD NOT BE 
BUILT) IS ONLY REQUESTED DURING 
SYSTEM INITIALIZATION. THE TYPE 
OF PROCESSING IS BASED ON AN 
INPUT FLAG. IF A SHORT PATH IS 
DESIRED, RETURN TO THE CALLER. 
OTHERWISE CONTINUE PROCESSING. 

BUILD LPME, EDB, IORB, SRB, IOSB 
AND SAVE AREA FOR PAGE OR SWAP 
DATA SET. IF THE REQUESTED DATA 
SET IS A PAGE DATA SET AND ON 
NIPTIME, PCCW'S WILL BE BUILT IN 
NUCLEUS BUFFER SPACE. IF SQA 
SPACE IS NOT AVAILABLE FOR THE 
CONTROL BLOCKS, RETURN CODE IS 
SET TO '16' ( ' 20 ' FOR NUCLEUS 
BUFFER SPACE NOT AVAILABLE) . 

IF ALL ABOVE PROCESSING IS 
SUCCESSFUL, A RETURN PARAMETER 
LIST WILL BE SET AND PASSED BACK 
TO CALLER WITH A RETURN CODE OF 
ZERO. 



Diagram 25.32 ILROPS00 (Part 2 of 2) 
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FIELD PARM 
LISTS 



FROM ILROPS00 
MAINLINE 



RETURN AREA 



M 



RETURN AREA 



PAGE SPACE 



LOCPAGE: 

foT| INVOKE CATALOG LOCATE ON A- 
CLUSTER NAME FOR PAGE DATA* 
SET. 

A. CHECK DATA SET TYPE. 

B. CHECK PAGE DATA SET. 

C. FAIL - RETURN TO 
CALLER . 



^> 



RETURN AREA 






DATA SET 
TYPE 




DATA CI 


PAGE FLAG 


SWAP FLAG 




REG 15 






RETURN 
CODE 











ISSUE A LOCATE ON A CLUSTER NAME 
REQUESTING NAMEDS AND CATTR 
INFORMATION. NAMEDS INCLUDES THE 
DATA SET TYPE ('INDEX' OR 'DATA') 
AND THE DATA CONTROL INTERVAL 
FOR ALL OTHER INFORMATION ON 
THIS DATA SET. CATTR CONTAINS A 
PAGE SPACE FLAG. 

A. CHECK THAT THE REQUESTED DATA 
SET TYPE IS ONLY 'DATA'. 

B. CHECK THAT THE PAGE DATA SET 
FLAG IS ON AND SWAP FLAG IS 
OFF. 

C. IF LOCATE FAILS OR THE DATA 
SET TYPE IS NOT 'DATA' OR THE 
DATA SET IS NOT A PAGE DATA 
SET, THEN SET REGISTER 15' TO 
'12' AND RETURN TO CALLER. 



SVC26 



Diagram 25.32.1 LOCPAGE (Parti of 2) 
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1 02 1 INVOKE CATALOG LOCATE ON A- 
DATA CONTROL INTERVAL. 



A. FAIL - RETURN TO 
CALLER. 



B. SUCCESSFUL - CONTINUE. 



RETURN TO 

ILROPS00 

MAINLINE 



*EG 15 


RETURN AREA 


RETURN 
CODE 




DEVICE 
TYPE 






VOLSER 




TRACK 
OVERFLOW 




STATISTIC 
INFO 



USING THE DATA CONTROL INTERVAL 
FROM THE FIRST LOCATE, ISSUE A 
LOCATE ON A DATA CONTROL 
INTERVAL, REQUESTING VOLPHV, 
VOLDEV, AMDSB AND ATTR1 
INFORMATION. VOLPHY AND VOLDEV 
CONTAIN RESPECTIVELY PHYSICAL 
AND DEVICE RELATED DATA. THE 
AMDSB CONTAINS CONTROL INTERVAL 
DATA . ATTR1 CONTAINS A TRACK 
OVERFLOW FLAG. 

A. IF 2ND LOCATE FAILS, ILROPS00 
SETS REGISTER 15 TO 12 AND 
RETURN TO CALLER. 

B. IF SUCCESSFUL, THEN CONTINUE. 



Diagram 25.32.1 LOCPAGE (Part 2 of 2) 
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RETURN AREA 



RETURN AREA 



PAGE SPACE 



[ 01 [ INVOKE CATALOG LOCATE ON A- 
CLUSTER NAME FOR SWAP DATA 
SET. 

A. CHECK DATA SET TYPE. 

B. CHECK SWAP DATA SET. 

C. FAIL - RETURN TO 
CALLER . 



^ 



RETURN AREA 


DATA 
TYPE 


SET 


DATA 


CI 


PAGE 


FLAG 


SWAP 


FLAG 




REG 15 


RETURN 
CODE 



ISSUE A LOCATE ON A CLUSTER NAME 
REQUESTING NAMEDS AND CATTR 
INFORMATION. NAMEDS INCLUDES THE 
DATA SET TYPE ('INDEX' OR 
'DATA') AND THE DATA CONTROL 
INTERVAL FOR ALL OTHER 
INFORMATION ON THIS DATA SET. 
CATTR CONTAINS A SWAP DATA SET 
FLAG AND PAGE DATA SET FLAG. 

A. CHECK THAT THE SWAP DATA SET 
TYPE IS 'DATA'. 

B. CHECK THAT THE SWAP AND PAGE 
DATA SET FLAGS ARE BOTH ON. 

C. IF LOCATE FAILS OR THE TYPE 
IS NOT 'DATA' OR THE DATA SET 
IS NOT A SWAP DATA SET, THEN 
SET RETURN CODE TO '12* AND 
RETURN TO THE CALLER. 



Diagram 25. 32.2 LOCSWAP (Part 1 of 2) 
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I 02 1 INVOKE CATALOG LOCATE ON A 
DATA CONTROL INTERVAL. 

A. CHECK SWAP DATA SET. 
TRACK OVERFLOW. 

B. FAIL - RETURN TO 
CALLER . 



C. SUCCESSFUL - CONTINUE 




RETURN TO 

ILROPS00 

MAINLINE 



*EG 15 


RETURN AREA 


RETURN 
CODE 




DEVICE 
TYPE 






VOLSER 




TRACK 
OVERFLOW 




STATISTIC 
INFO 



USING THE DATA CONTROL INTERVAL 
FROM THE FIRST LOCATE, ISSUE A 
LOCATE ON A DATA CONTROL 
INTERVAL, REQUESTING VOLPHV, 
VOLDEV, AMDSB, AND ATTRC 
INFORMATION. VOLPHY AND VOLDEV 
CONTAIN RESPECTIVELY PHYSICAL 
AND DEVICE RELATED DATA. THE 
AMDSB CONTAINS CONTROL INTERVAL 
DATA. ATTRC CONTAINS A TRACK 
OVERFLOW FLAG. 

A. TRACK OVERFLOW IS NOT ALLOWED 
FOR SWAP DATA SET. 

B. IF THE SECOND LOCATE FAILS OR 
THE TRACK OVERFLOW FLAG IS 
ON, SET THE RETURN CODE TO 12 
AND RETURN TO CALLER. 

C. IF SUCCESSFUL, THEN CONTINUE. 



Diagram 25.32.2 LOCSWAP (Part 2 of 2) 
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VMTVER: 

|"ot"| INITIALIZE PARAMETER LIST 
FOR VOLUME MOUNT AND 
VERIFY REQUEST. 

| 02 | INVOKE NIPMOUNT. 

A. GET UCB ADDRESS. 

B. TAKE ERROR EXIT ON 
FAILURE. 



C. SUCCESSFUL - CONTINUE. 



RETURN TO 

ILROPS00 

MAINLINE 



ERROR EXIT 
REG 15 






RETURN 
CODE 











j 1 I PUT THE DATA SET NAME AND VOLSER 
IN THE PARAMETER LIST FOR 
NIPMOUNT. 

| 02 | INVOKE NIPMOUNT SERVICE. 

A. IF SUCCESSFUL, REGISTER 1 
WILL CONTAIN A UCB POINTER. 

B. IF NIPMOUNT FAILS, PUT AN 8 
IN REGISTER 15, AND RETURN TO 
CALLER. 

C. IF SUCCESSFUL, THEN CONTINUE. 



Diagram 25.32.3 VMTVER (Part 1 of 1) 
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SET UP ADDRESSABILITY TO 
REQUEST BLOCK FOR DYNAMIC 
ALLOCATION. 

REQUEST A DSNAME 
ALLOCATION. 

SET TEXT UNITS FOR 
ALLOCATION. 



L 



„ 


rEXT UNIT 


fc 




| |02 DSNAME | 




ADDR TEXT 
UNIT 




PEXT UNIT 


1 


1 V 

1 JDISP-OLD 




ADDR TEXT | J 
UNIT | 


TEXT UNIT 


1 '|55 DDNAME | 




ADDR TEXT 
UNIT 







[01 [ THE REQUEST BLOCK - S99RB IS 
MAPPED BY IEFZB4D0. IT IS THE 
INPUT PARAMETER TO DYNAMIC 
ALLOCATION. 

[oT| SET CODES IN REQUEST BLOCK TO 

INDICATE THAT DSNAME ALLOCATION 
IS DESIRED. TURN ON THE OFFLINE 
UNITS BIT (S990FFLN) AND THE 
MOUNT VOLUME BIT (S99MOUNT) , SO 
DYNAMIC ALLOCATION WILL NOTIFY 
THE OPERATOR WHEN THESE 
CONDITIONS OCCUR. 

[oJ] TEXT UNITS, POINTED TO BY THE 

REQUEST BLOCK, ACTUALLY CONTAIN 
THE INPUT DATA (DSNAME AND 
DISPOSITION) AND THE EXPECTED 
OUTPUT DATA (DDNAME) . THE OUTPUT 
DATA IS FILLED IN BY DYNAMIC 
ALLOCATION. 



Diagram 25.32.4 DYNALLO (Part 1 of 3) 
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Output 



04 INVOKE DYNAMIC ALLOCATION. 



| 05 | CHECK RETURN CODE FROM 
DYNALLOC. 

A. FAIL - SET MOUNT FAIL 
RETURN CODE, RETURN TO 
CALLER . 



7=3 



| 04 | INVOKE DYNALLOC MACRO TO 
ALLOCATE A DATA SET. 

| 05 | IF DYNAMIC ALLOCATION FAILS, SET 
REG 15 TO 8 AND RETURN TO 
CALLER . 



Diagram 25.32.4 DYNALLO (Part 2 of 3) 
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DSAB QDB 



JSCDSABQ 



JSCDSABQ 



r 



PTR DSAB 


J" 






DDNAME 


DSABTIOT 






ADDR UCB 



TIOT DD 
ENTRY 








DDNAME 








ADDR UCB 



1 06 1 FIND UCB ADDRESS THRU 
TIOT. 

A. IF UNSUCCESSFUL, SET 

RETURN CODE TO INDICATE 
THAT MOUNT FAILED AND 
RETURN TO CALLER. 



B. SUCCESSFUL - CONTINUE. 



RETURN TO 

ILROPS00 

MAINLINE 



THE UCB ADDRESS IS NOT RETURNED 
BY DYNAMIC ALLOCATION SO IT MUST 
BE OBTAINED BY SEARCHING TIOTS 
WITH THE RETURNED DD NAME. IF 
THE DD NAME CANNOT BE FOUND IN 
TIOTS SET REG 15 TO 8 AND RETURN 
TO CALLER. IF SUCCESSFUL, THEN 
CONTINUE. 



Diagram 25.32.4 DYNALLO (Part 3 of 3) 
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DEVICE ID 
TABLE 








- 


CATALOG 
LOCATE DATA 






VOLDEV 






DEVTYP 











M 



GETCORE : 
[qT| IDENTIFY DEVICE TYPE. 

A. IF THE DEVICE TYPE IS 
INVALID, SET THE RETURN 
TO INDICATE LOCATE 
FAILURE AND RETURN TO 
CALLER. 



| 02 | GETMAIN SQA SPACE FOR 
CONTROL BLOCKS. 

A. IF SPACE IS NOT 

AVAILABLE, SET THE 
RETURN CODE AND RETURN 
TO CALLER. 



;=0 



V . 
RETURN TO 
CALLER 



SEARCH A TABLE OF VALID DEVICE 
TYPE FOR A MATCH WITH THE DEVICE 
TYPE RETURNED BY THE CATALOG 
LOCATE. IF A MATCH IS NOT FOUND, 
PUT A 12 (LOCATE FAIL) IN REG 15 
AND RETURN TO CALLER. 

CALCULATE THE TOTAL SIZE FOR 
IORB-IOSB-SRB, EDB AND LPMB. 
ISSUE A CONDITIONAL GETMAIN. IF 
REQUESTED SPACE IS NOT 
AVAILABLE, SET REG 15 TO 16 (NOT 
ENOUGH SQA SPACE) AND RETURN TO 
CALLER. 



Diagram 25.32.5 GETCORE (Part 1 of 3) 
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PAGE-NIP-L 
ONG PATH 




% 








NVT 














NVTNBFND 








NVTNUCNP 








; 


VSMVT 


= 

















Output 



IF PAGE SPACE REQUEST AT 
NIPTIME, ACQUIRE NUCLEUS 
BUFFER SPACE FOR PCCWS . 

A. IF SPACE IS NOT 

AVAILABLE, SET THE 
RETURN CODE AND RETURN 
TO CALLER. 



B. INITIALIZE PCCWS. 



IF NIPTIME, UPDATE UCB 
INFORMATION. 



c 





J 


f ' 








PCCW 






'1 1 



CALCULATE THE NUMBER OF PCCWS 
FOR THIS DEVICE TYPE AND CHECK 
THAT THERE IS ENOUGH SPACE FOR 
PCCWS IN THE NUCLEUS BUFFER. IF 
THERE IS NOT ENOUGH SPACE, SET 
REG 15 TO 20 (NUCLEUS BUFFER 
DOES NOT HAVE ENOUGH SPACE) AND 
RETURN TO CALLER. INITIALIZE THE 
CCW STRING WITH SEEK, SET 
SECTOR, SEARCH, ID, TIC, 
READ/WRITE NOP. CHAIN THE PCCWS 
TOGETHER. 

THE UCB INFORMATION IS UPDATED 
TO INCREMENT USER COUNT, AND TO 
MARK IT AS A PAGE SPACE AND 
PERMANENTLY RESIDENT. 



Diagram 25.32.5 GETCORE (Part 2 of 3) 
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CATALOG 
LOCATE DATA 


CATALOG 
LOCATE DATA 






VOLPHY 




VOLDEV 










CATALOG 
LOCATE DATA 


CATALOG 
LOCATE DATA 






AMDSB 




ATTR1 





















=Jr 



Processing 



| 05 | INITIALIZE LPMB WITH 
DEVICE TYPE 
CHARACTERISTICS. 

| 06 | INITIALIZE EDB HEADER AND 
ENTRY FOR EACH DATA SET 
EXTENT . 

| 07 | INITIALIZE IORB-IOSB-SRB 
STRING OF CONTROL BLOCKS. 



Output 



TJ=* 



RETURN TO 

ILROPS00 

MAINLINE 






| 05 | THE LPMB (LOGICAL TO PHYSICAL 
MAPPING BLOCK) FIELDS 
INITIALIZED ARE: ID, LENGTH 
TRACKS PER ALLOCATION UNIT, 
TRACKS PER CYLINDER, BLOCKS PER 
TRACK, BLOCK SIZE, BYTES PER 
TRACK, BYTES PER ALLOCATED 
UNITS, THE TRACK OVERFLOW AND 
RPS DEVICE FLAGS IF APPLICABLE. 

| 06 | INITIALIZE RDB (EXTENT 

DEFINITION BLOCK) HEADER FIELDS: 
ID, LENGTH, NUMBER OF EXTENTS, 
LPMB ADDRESS. FOR EACH EXTENT 
INITIALIZE: LPMB ADDRESS, EXTENT 
NUMBER, STARTING TRACK, LOW RBA, 
HIGH RBA, TRACK OVERFLOW. 

1 07 1 AN IORB-IOSB-SRB STRING WILL BE 
INITIALIZED FOR EACH IORB 
REQUIRED. THE IORB FIELDS 
INITIALIZED ARE: ID, NUMBER OF 
IORB'S, RPS FLAG, IOSB ADDRESS, 
AND CHAIN FIELD TO NEXT IORB OR 
ZERO. THE INITIALIZED FIELDS IN 
IOSB ARE: DRIVER ID, I/O FILE 
MASK, IORB ADDRESS, SRB ADDRESS, 
I/O TERMINATION ADDRESS, NORMAL 
AND ABNORMAL END APPENDAGE. SRB 



FIELDS INITIALIZED ARE: ID, AND 
NON-QUIESCEABLE PRIORITY. THE 
SRB IS POINTED TO BY IOSB WHICH 
IS POINTED TO BY IORB. 



Diagram 25.32.5 GETCORE (Part 3 of 3) 
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I I 

| SRB **■ 



ADDR . BUFFE 



FROM ASM 
INITIALIZATION 
OR ILRPGEXP 

fc> 



IOSUSE(ECB 



Output 



ILRPREAD: 

I 01 I ILRPREAD IS A SPECIAL ASM 
1 ■ I/O DRIVER. 



02 OBTAIN STORAGE FOR 

1 1 BUILDING CCWS, IOSB, AND 

SRB FROM SQA. 



03 ISSUE ESTAE. 



04 BUILD IOSB AND SRB. 



05 BUILD CHANNEL PROGRAM 
1 ' (CCWS) . 



| 06 | START I/O. 

| 07 | WAIT FOR I/O TO COMPLETE. 



| 08 | CHECK I/O SUCCESSFUL. 



B.' UNSUCCESSFUL: SET ERROR 
RETURN CODE, GOTO STEP 
10. 



£p3 



ADDR.GETMA 
IN IN SQA 



IOSUSE(ECB 



^ 


1 


SRB 






SRBPTCB 




SRBPARM 




SRBPASID 



SEEK HEAD 



SEARCH ID 
EQ 



TIC 



RD/WT 







ILRPREAD IS AN I/O DRIVER THAT 
READS AND WRITES SLOTS 
CONTAINING CONTROL BLOCKS AND 
OTHER INFORMATION NEEDED BY ASM. 
SYSTEM INITIALIZATION READS AND 
WRITES ILRTPARB, ILRQSRCD, AND 
RECORD TIMESTAMPS. ILRPGEXP 
READS AND WRITES ILRTPARB JTHE 
TPARTBLET. THESE CONTROL BLOCKS 
ARE NEEDED FOR QUICK AND WARM 
STARTS TO OCCUR? 



ENTRY IS FROM ASM INITIALIZATION 
ROUTINES (ILRASRIM, ILRQSRIT, 
ILRTMI00) OR FROM PAGE EXPANSION 
(ILRPGEXP) . STORAGE IS OBTAINED 
FROM SOA FOR BUILDING CCWS, IOSB 
AND SRB. THE CCW AREA OBTAINED 
IS LARGE ENOUGH TO READ/WRITE 
TEN SLOTS. IF GETMAIN FAILS, A 
CODE OF 8 IS RETURNED. 



THE ADDRESSES OF NORMAL END 
APPENDAGE, ABNORMAL END 
APPENDAGE, I/O TERMINATION 
ROUTINES, AND SRB ADDRESS ARE 
PUT, INTO THE IOSB. THE ROUTINES 
ARE SECONDARY ENTRY POINTS IN 
ILRPREAD. THE ADDRESSES OF THE 
TCB AND IOSB ARE PUT INTO THE 
SRB. THE ASID (ADDRESS SPACE 
IDENTIFIER) IS ALSO PUT INTO THE 
SRB. SINCE THE TCB AND ASID 
AFFINITY ADDRESSES ARE IN THE 
IOSB, RTM PROCESSING CLEANS UP 
ANY ILRPREAD RESOURCES AND 
OUTSTANDING I/O UPON ERRORS 
OCCURRING IN IOS OR ILRPREAD 
APPENDAGE ROUTINES. 



CREATE THE CHANNEL PROGRAM FOR 
READS OR WRITES - MAXIMUM TEN 
SLOTS WITHIN A CYLINDER. THESE 
CONSIST OF SEEK HEAD, SEARCH ID 
EQUAL, TIC AND READ/WRITE. IF AN 
ERROR OCCURS DURING CONVERTING 
SLOT NUMBER TO REAL SEARCH 
ADDRESS THE CONTROL WILL IS 



PASSED TO 10. 



06 CALL START I/O FOR READ/WRITE. 



07 WAIT FOR I/O TO COMPLETE. THE 

1 ■ I/O COMPLETION ROUTINE WILL POST 

ECB WHEN IT GETS CONTROL. 



CHECK I/O COMPLETION. IF IT IS 
NOT SUCCESSFUL, THE CONTROL WILL 
BE PASSED TO STEP 10. 



PREADNRM. 
PREADABN 
PREADTRM 



Diagram 25.33 ILRPREAD (Part 1 of 2) 
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A. YES: GOTO STEP 5. 

B. NO: CONTINUE TO 
PROCESS. 

| 1 | CANCEL ESTAE. 

Ill I FREE STORAGE OBTAINED FOR 
1 ' CCWS, IOSB AND SRB. 

|12| RETURN. 



REGISTER 1 5 



09 IF THE I/O COMPLETED 

I 1 SUCCESSFULLY, THE NUMBER OF 

REQUESTS REMAINING IS CHECKED. 
IF MORE SLOTS ARE TO BE 
PROCESSED, REPEAT FROM STEP 5. 



10 CANCEL THE ESTAE. 



11 IF THE REQUESTED READS OR WRITES 

' 1 ARE (COMPLETED, ALL THE STORAGE 

• OBTAINED FOR CCWS, IOSB, AND SRB 
WILL BE FREED. 



EDO 



IF READ/WRITE IS SUCCESSFUL, A 
RETURN CODE OF ZERO WILL BE 
RETURNED. OTHERWISE A RETURN 
CODE OF FOUR FOR 
READ/WRITE/CONVERT ERROR OR A 
RETURN CODE OF EIGHT FOR SPACE 
NOT AVAILABLE WILL BE RETURNED. 



Diagram 25.33 ILRPREAD (Part 2 of 2) 
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Input 



FROM IOS 
(IECVPST) 



fc> 



P rocessing 

PREADABN: 
[Orj RETURN TO IOS 



Output 



RETURN TO IOS 
(IECVPST) 



roil FOR NORMAL AND ABNORMAL 

I " APPENDAGES, CONTROL IS PASSED 

BACK TO IOS IMMEDIATELY. 



Diagram 25.33.1 PREADABN (Part 1 of 1) 
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input/output 5-146 

INTIALIZE BUFC 5-410 

INTMON 5-170 

I/O request overview 5-366 
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movehead 5-446 

NOAIE 5-174 

prepare for a write 5-418 

process request 5-430 

PROCLG 5-166 

PUTASPCT 5-338 

PUTONE 5-318 

QUEIOE 5-382 

QUEIT 5-176 

QUESWAP 5-374 

RECHAIN 5-458 
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RELLG 5-136 

RELLP 5-138 

REMOVA 5-192 

REVERSER 5-172 

RLGSG01 5-304 

RLGSG02 5-308 

RLGSG03 5-310 

RLGSG04 5-354 

RLGSG05 5-356 

RLPSG01 5-224 

SAVE 5-140 

SAVEACT 5-150 

SAVEPUT 5-334 

SAVSG04 5-282 

SAVSG06 5-288 

SAVSG08 5-292 

SAVSG10 5-294 

SAVSG11 5-284 

SAVSG061 5-344 

SAVSG062 5-346 

SAVSG063 5-348 

select I/O request 5-402 

sort rotation 5-434 

STARTOP 5-178 

STINDV 5-180 

SVRLGGET 5-328 

SWAPCHK 5-148 

TRPAGE 5-142 

TRPSG02 5-234 

TRPSG03 5-236 

TRPSG04 5-240 
mounting a volume (see volume mount & verify) 
MOVEHEAD diagram 5-446 

move-out processing in VIO services routine 5-56-5-57 
MP (see multi-processor system) 
MSRDA or BASEA (master scheduler resident data area) 

in VSM address space creation 5-102 
MSS 
multi-unit generic (see MUG) 



new address space (see address space) 

NOAIE diagram 5-174 

NOTREADY diagram 5-468 

null assignment in VIO services routine 5-55 
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Organization (see Program Organization Section) 
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introduction to MOs 5-344 (VS2.03.807) 

overview diagram 5-345 (VS2.03.807) 
page faults 

error in 5-82 

global locks end 5-22 

satisfying 5-22 

validity checking 5-22 
page, finding 5-78 
page fix (see also PGFIX) 

freeing a fixed page 5-38 

"long fix" processing 5-24, 5-38 

processing 5-34 
page frame (see also GFA) 

allocation 5-24, 5-34 

assigning real 5-42 

freeing 5-52, 5-40 

interruption 5-22 

paging out 5-40 

reclamation 5-24 

replacement 5-64, 3-47 

status, determining 5-8 

stealing 5-6 

validating 5-64 
page free request (see PGFREE) 
page I/O completion processing 5-28 
page I/O initiation 5-52 
page I/O initiation error 5-59 
page I/O post 5-28 
page load (see PGLOAD) 
page release processing 5-14 
page seconds 5-73 (VS2.03.807) 
page services interface 5-32 
page services interface error 5-32 
page table building/creation 

in obtaining a new memory 5-102, 2-250 

in V=R region allocation 5-8 
page table, freeing 5-12 
page-in completion 5-28 
paging termination services 5-62 
page-out completion 5-28 
page validation 5-65 
PAGEADD command (ASM) (VS2.03.807) 

processing of 5-344 (VS2.03.807) 
paging I/O 5-119 (VS2.03.807) 
parse (see IKJPARSE) 
PART (page activity reference table) (VS2.03.807) 

in page processing 5-119 (VS2.03.807) 
PARTE (page activity reference table entry) (VS2.03.807) 

in page processing 5-152 (VS2.03.807) 
path, device (see device path) 
PCB (page control block) 

in freeing a V=R region 5-12 

in FREEMAIN release processing 5-16 

in general frame allocation 5-24 

in page I/O initiation 5-52 

in page I/O post 5-28 

in page release processing 5-14 

in page termination services 5-62 

in PCB management 5-74 

in PGFIX/PGLOAD root exit 5-36 

in PGOUT 5-40 

in program interruption extension 5-22 

in real storage reconfiguration 5-70 

in swap-in processor routine 5-42 

in swap-in root exit 5-44 

in swap-out processor routine 5-46 

in swap-out root exit 5-50 

in V=R region allocation 5-10 

in VIO services 5-56 

I/O complete 5-46 

I/O not-complete 5-46 
PCB manager 5-74 
PCCW (program channel command workarea) (VS2=03=807) 

in completion processing 5-153 (VS2.03.807) 

in page processing 5-152 (VS2.03.807) 
PFK (see program function key) 
PFTE (page fix table entry) 

in deleting an address space 5-60 
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n page I/O completion processing 5-30 
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n page termination services 5-62 
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n PGFIX/PGLOAD 5-36, 5-34 
n PGFREE 5-38 
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n swap-out 5-46 
n translating real to virtual 5-80 
n VIO services 5-54 
n V=R region allocation 5-8 
putting on LSQ A frame queue 5-58 

PFTE (enqueue dequeue routine) 5-72 

PGFIX 

5-36 
5-32 
5-34 



5-32 
5-38 

5-36 

5-32 
5-34 

5-40 



completion 

interfaces 

processing 
PGFREE 

interfaces 

processing 
PGLOAD 

completion 

interfaces 

processing 
PGOUT 

processing 
PGTE (page table entry) 

calculating addresses in 

in creating a segment 5 

in destroying a segment 

in finding a page 5-78 

in FREEMAIN release processing 

in general frame allocation 5-24 

in LSQA/SQA allocation 

in page frame replacement 

in page I/O post 5-28 

in page invalidation 5-76 

in page release processing 

in PGFIX/PGLOAD processing 

in PGOUT 5-40 

in program interruption extension 



5-78 
-18 
5-20 



5-16 



5-6 
5-64 



5-14 



5-34 
5-22 



in real storage reconfiguration 5-68 

in swap-in root exit 5-44 

in VIO services 5-54 

in invalidating real and virtual pages 5-14, 5-76 

initializing 5-18 
PLPA page data set (ASM) (VS2.03.807) 

overflow processing 5-152 (VS2.03.807) 
PLPASAVE diagram 5-186 
pool (see quick cell) 
posting region requests 

error termination 5-100 
PQE (partition queue element) 

in freeing a virtual region 5-101 

in VSM address space creation 5-103 
preferred area, meaning of 5-25 
preferred area steal (in RSM) 5-84 
prepare for a write diagram 5-430 
process request diagram 5-430 
processors, command (see command processing) 
PROCLG diagram 5-171 
program interrupt extension 5-22 
programmer, writing to (see WTP) 
prompting exit (see pre-prompt exit, LOGON) 
PUTASPCT diagram 5-338 
PUTONE diagram 5-318 
PVT (page vector table) 

in PFTE enqueue/dequeue 5-72 

in RSM functional recovery routine 5-82 

in swap-in 5-42 



QUEIOE diagram 5-382 
QUEIT diagram 5-176 
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QUESWAP diagram 5-374 

quick cell 

allocating 5-110 
boundary alignment of pool 
building pools 5-108 
deleting pool 5-114 
formatting pool 5-108 
freeing pool space 5-114, 5- 
returning to pool 5-112 



5-112 



112 



RSM preferred area steal 5-84 

RSM V=R region allocation 5-98 

RSMH 

in deleting an address space 5- 
in destroying a segment 5-20 
in initializing an address space 

R/TM (see recovery termination) 



60 

5-58 



RCA (RSM recovery communications area) 

in initializing an address space 5-58 

in initiating page I/O 5-52 

in page I/O post 5-28 

in page termination services 5-62 

in RSM functional recovery routine 5-82 

in swap-in 5-42 
real address, translating to virtual 5-80 
real frame (see page frame) 
real frame replacement 5-64 
real storage 

reconfiguration 5-68 
real storage manager 

functional recovery routine 5-82 

PGFIX function 5-34, 5-36 

preferred area steal 5-84 
RECHAIN diagram 5-458, 1-2-2-282 
recording, error (see error recording) 
recovery (ASM) (VS2.03.807) 

introduction to MOs 5-250 (VS2.03.807) 

overview diagram 5-256 (VS2.03.807) 
recovery, error (see error recovery ESTAI) 
recovery, FRR (see functional recovery routine) 
region allocation 

insufficient space for 5-99, 5-9 

V=R 5-8 

XMPOST errors during 5-99 
region control blocks 

creating 5-102-5-103 

dequeueing 5-104-5-105 

releasing 5-12-5-13, 5-101 
region control task 

posting by swap-in root exit 5-44 
region requests 

checking V=R requests after freeing a region 
5-100-5-101 

V=R 5-98 

V=V 5-98 

XMPOST error during 5-99 
region size, system default 5-99 
region validation 5-10-5-1 1 
RELEASE LG (RELLG) 

functional description5-222 (VS2.03.807) 

initial processing of 5-203 (VS2.03.807) 

MO diagram 5-136 

recovery for 5-252 (VS2.03.807) 
release processing in FREEMAIN routine 5-16 
RELLG diagram 5-136 
RELLP diagram 5-138 
REMOVA diagram 5-192 
requests, allocation 
requests, region (see region requests) 
resources manager (see system resources manager) 
restarting (see restart) 
returning virtual region space to available space (in 

FREEPART) 5-100 
REVERSER diagram 5-172 
RLGSG01 diagram 5-304 
RLGSG02 diagram 5-308 
RLGSG03 diagram 5-310 
RLGSG04 diagram 5-354 
RLGSG05 diagram 5-356 
RLPSG01 diagram 5-224 
RMPL (system resources manager parameter list) 

in page termination services 5-62 
RMWA 

in page termination services 5-62 
RSM (see real storage manager) 
RSM functional recovery routine 5-82 



'S' symbol (VS2.03.807) 

in save, activate, and release processing 5-222 
(VS2.03.807) 
SART (swap activity reference table) (VS2.03.807) 

in swap processing 5-119 (VS2.03.807) 
SARWAITQ (SART wait queue) (VS2.03.807) 

in swap completion processing 5-120 (VS2.03.807) 
SAVE LG request (VS2.03.807) 

functional description 5-222 (VS2.03.807) 

initial processing of 5-203 (VS2.03.807) 

recovery for 5-252 (VS2.03.807) 
S AVEACT diagram 5-150 
SAVE diagram 5-140 
SAVEPUT diagram 5-334 
SAVSG04 diagram 5-282 
SAVSG06 diagram 5-288 
SAVSG08 diagram 5-292 
SAVSG10 diagram 5-294 
SAVSG 11 diagram 5-284 
SAVSG061 diagram 5-344 
SAVSG062 diagram 5-346 
SAVSG063 diagram 5-348 
SCCW (swap channel command workarea) (VS2.03.807) 

in completion processing 5-153 (VS2.03.807) 

in swap processing 5-119 (VS2.03.807) 
scheduler (see job scheduler) 
screen image buffer (see SIB) 
SDWA (system diagnostic work area) 

in freeing an address space 5-104 

in freeing a virtual region 5-100 

in getting a virtual region 5-98 

in RSM functional recovery routine 5-82 

in VSM address space creation 5-102 

in VSM task termination 5-106 
SECCHK diagram 5-386 
second level interrupt handler (see SLIH) 
segment 

creating, in IEAVCSEG 5-18 

destroying, in IEAVDSEG 5-20 

invalidating, in RSM 5-16 
SEGRLSE diagram 5-226 
select I/O request diagram 5-402 
service routine (ASM) (VS2.03.807) 

introduction to MOs 5-334 (VS2.03.807) 

overview diagram 5-335 (VS2.03.807) 
SGTE (segment table entry) 

in creating a segment 5-18 

in destroying a segment 5-20 

in FREEMAIN release processing 5-16 

in initializing an address space 5-58 

initializing 5-18 

invalidating 5-20 

swap-in root exit 5-44 

in V=R region allocation 5-8 
shared subpools 

exception in freeing when task terminates 5-106 
SIB (screen image buffer) 
signal processor (see SIGP instruction) 
single line message (see WTO) 
SMF (System Measurement Facility) 

TCT "storage-used" field, updating by FREEMAIN 
5-97 
sort rotation diagram 5-434 
space, address (see address space) 
space, region 

allocating in GETPART 5-98 
SPCT (swap control table) 

in creating a segment 5-18 

in deleting an address space 5-60 

initializing 5-58, 5-18 

in swap-in 5-42 
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processing 5-46 
root exit 5-50 

repacking 5-20 
SPQE (subpool queue element) 

in freeing a virtual region 5-100 

iriFREEMAIN 5-96 

in GETMAIN 5-94 

in getting a virtual region 5-98 

in VSM task termination 5-106 
SQA 

allocation 5-6 

allocation, virtual storage for 5-94 

GETMAIN for, processing 5-94 

reserve queue, search of to satisfy SQA request 5-7 

search of the available frame queue 5-6 

stealing a frame if no preferred area frame is on the 
available frame queue 5-7 
SRB (service request block) (see also dispatcher) 

in deleting an address space 5-60 

in page I/O initiation 5-60 

in page I/O post 5-28 

in PCB management 5-74 

in PFTE enqueue/dequeue 5-72 

in real storage reconfiguration 5-68 

in swap-in root exit 5-44 (VS2.03.807) 

in swap-in post processor 5-45.0 (VS2.03.807) 

in V=R region allocation 5-8 
stack, FRR ( see FRR stack) 
STARTDP diagram 5-178 
statement (see JCL statement) 
status, console (see console status) 
stealing page frames 5-64, 3-46, 5-7, 5-25, 5-84 
STEPL (STAE exit parameter list) 
STIND Y diagram 5- 1 80 
STOP MONITOR command 
storage, global 

freed when task terminates 5-106 
storage management (see real storage manager, virtual 

storage management, system resources manager) 
storage, real allocation of frames 5-25 
stream, input (see converter) 
subpool numbers, attributes of 5-89 
subpool number, checking in GETMAIN 5-94 
subpool storage 

freeing at task termination 5-106 
subpool, checking in FREEMAIN 5-96 
subpools, shared 

exception from freeing at task termination 5-106-5-107 
subsytem name, determination of 638 
SVC interruptions (see supervisor interruptions handler) 
SVC 109 (see extended SVC routing) 
SVC 116 (see extended SVC routing) 
SVC 122 (see extended SVC routing) 
SVCIH (see supervisor interruption handler) 
SVRLGGET diagram 5-328 
SWA storage 

freed when task terminates • 5-106 
swap data sets (ASM) (VS2.03.807) 

dynamic addition of 5-344 (VS2.03.807) 
SWAPCHK diagram 5-148 
swapping I/O 5-119 (VS2.03.807) 
swap-in, address space 

root exit 5-44 

completion error 5-82 
swap-in processor routine (in RSM) 5-42, 5-44 
swap-in root exit routine (in RSM) 5-44 
swap-in post processor 5-45.0 (VS2.03.807) 
swap-in SRM notification if swap-in fails 5-43 
swap-out, address space 

completion processor 5-50 (VS2.03.807) 

initiating 5-52 

root exit routine 5-50 

SRM notification that swap-out is complete 5-51 

swap-out processor (in RSM) 5-46, 5-50 
System Activities Measurement Facility (see MF/1) 
system- default region size 5-99 
system log data set (see system log) 
System Measurement Facility (see SMF) 
system parameter library (see SYSl.PARMLIB) 
system reconfiguration (see reconfiguration commands) 



system resources manager (SRM) (see also workload 
manager) 3-3 
swap-out completion, notification from RSM 5-50 
system, stopping (see stopping) 
system trace (see trace, system) 
system trace termination (see trace termination) 



TCB (task control block) 

in freeing an address space 5-104 

in GETMAIN 5-94 

in page termination services 5-62 

in PGFREE 5-38 

in VSM task termination 5-106 
TCT (timing control table) 

FREEMAIN 5-96 
terminator (see initiator/terminator) 
text, internal (see converter, internal text) 
timer second level interrupt handler (see timer SLIH) 
TIOT manager control routine 
TLB (translation look-side buffer) 

invalidating 5-20 

purging 5-52 
TMCMSG diagram 5-364 
TMCSG06 diagram 5-360 
TMCSG10 diagram 5-362 
TPCA (see TPC) 
TRANSFER PAGE 

MO diagram 5-142 
translating real addresses to virtual 5-80 
TRPAGE diagram 5-142 
TRPSG02 diagram 5-234 
TRPSG03 diagram 5-236 
TRPSG04 diagram 5-240 
TSO LOGON (see LOGON) 



unit affinity (see allocating affinity requests) 
unit, allocating request to (see allocating requests to units) 
user, allocating virtual storage for (GETMAIN) 5-94 
User, swapping (see swap-in, swap-out) 



V=R completion processing for intercepted frames 5-6 

V=R frame interception 5-11 

V=R region allocation 5-8 

V=R region requests, processing in GETPART 5-98 

V=V region requests, processing in GETPART 5-98 

values, IPS (see IPS values) 

VCB 

in VIO services 5-54 
VIO control (ASM) (VS2.03.807) 

introduction to MOs 5-202 (VS2.03.807) 

overview diagram 5-204 (VS2.03.807) 
VIO data sets (VS2.03.807) 

activating 5-222 (VS2.03.807) 

ASM processing of 5-202 (VS2.03.807) 

creating 5-203 (VS2.03.807) 

saving 5-222 (VS2.03.807) 
VIO group operators (ASM) (VS2.03.807) 

introduction to MOs 5-222 (VS2.03.807) 

overview diagram 5-224 (VS2.03.807) 
VIO services routine 5-54 
virtual addresses, translating from real 5-80 
virtual region 

freeing 5-100 

getting 5-98-5-99 

space to available space, returning 5-100 
virtual storage, allocating (GETMAIN processing) 5-94 
virtual storage management (VSM) 

address space creation 5-102 

overview 5-87 
virtual storage unallocation 5-96 
volume serial number (see VOLSER) 
volume, specific allocation (see specific volume allocation 

control) 
volume unload control (see IEFAB494 object module) 
volunit table 
VRWAITQ 

in freeing a V=R region 5-101 
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VRWPQE (V=R wait/post queue element) 

in getting a virtual region 5-98 
VSL (virtual subarea list) 

in freeing a virtual region 5-12 

in page services 5-32 

in PGOUT 5-40 
VSM (see virtual storage management) 
VSM address space creation 5-102 
V=R region 

freeing 5-12 

getting 5-98-5-99, 5-8 



write-to-programmer (see WTP) 
WTOMSG diagram 5-154 
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calculating addresses in 5-78 
in creating a segment 5-18 
in finding a page 5-78 
in freeing a virtual region 5-12 
in FREEMAIN release processing 5-16 
in general frame allocation 5-24 
in LSQA/SQA allocation 5-6 
in page processing 5-119 (VS2.03.807) 
in PGFIX/PGLOAD 5-38 
in PGOUT 5-40 
in swap-in root exit 5-44 
in VIO services 5-54 
in V=R region allocation 5-8 
initializing 5-18 
XSA (extended save area) 

in getting a virtual region 5-98 
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